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Package Contents 


Your BASIC package includes one BASIC cartridge which contains 
the BASIC.PGM file, and one manual containing the following docu- 
mentation: 


BASIC User’s Guide, which contains all the information about Micro- 
soft BASIC that is specific to its use with The Roadrunner™ Por- 
table Computer. This includes a description of the features affected 
by your implementation of Microsoft BASIC, information about car- 
tridge file handling, and instructions ¢ on the use of assembly lan- 
guage subroutines. 


Microsoft BASIC Reference Manual, which contains descriptions of 
all Microsoft BASIC features. With the exceptions noted in the 
User's Guide, this information applies to all implementations of 
Microsoft BASIC. 
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This implementation of BASIC utilized in the RoadRunner contains the 
features and ae of Microsoft BASIC as described below. 


_ In 1975, Microsoft wrote the first BASIC interpreter for the microcom- 
puter. Today Microsoft-BASIC is the BASIC you'll find on all the largest- 
selling microcomputers and in the application programs sold by many 
manufacturers and software houses. With over a million installations, 
Microsoft-BASIC is recognized as the industry standard. 


Major Features of Microsoft BASIC 
Four variable types: integer (-32768 through +32767), string (up to 
255 characters), single precision floating-point (7 digits), double 
precision floating-point (16 digits) : 
Trace facilities (TRON/TROFF) for easier debugging 


Error trapping using the ON ERROR GOTO statement 


PEEK and POKE statements to read and write any memory location 


Automatic line number generation and renumbering, including ref- 
erenced line numbers 


Arrays with multiple dimensions 

Boolean operators OR, AND, NOT, XOR, EQV, and IMP 
Formatted output with the complete PRINT USING facility, including : 
asterisk fill, floating dollar sign, scientific notation, trailing sign, and 


comma insertion 


Extensive program editing facilities with the EDIT command and edit 
mode subcommands 


Assembly language subroutine calls: up to 10 per program with the 
USR function; limited only by available memory space with the 
CALL statement — 


IF/THEN/ELSE and nested eee constructs 


Variable length random access and sequential access cartridge 
files with a complete set of file manipulation statements: OPEN, 
_ CLOSE, GET, PUT, KILL, NAME, and MERGE 


Note that features may vary from one implementation of MS-BASIC to : 
the next. See Chapter 1 of this manual for an exact description of @ 
the features included in your implementation of Microsoft-BASIC with 

the RoadRunner. | | | 


System Requirements 
Implementation of Microsoft-BASIC in the RoadRunner requires: — 
32K bytes of memory minimum: 


24K for BASIC 
Approximately 6K for the operating system 
Additional memory to run programs 


Files Included with Microsoft BASIC 


Implementation of Microsoft BASIC in the RoadRunner includes the & 
BASIC.PGM file. This is the version of Microsoft BASIC to be used on 
the RoadRunner. _ | | 


How to Use this Manual 


The BASIC User's Guide contains the information about Microsoft 
BASIC that is specific to its operation in the Roadrunner. Also provided 
are separate chapters on converting previously written programs to 

Microsoft BASIC, handling cartridge files, and calling assembly lan- 
guage subroutines. Briefly: | 


This Introduction tells you about Microsoft BASIC and its special fea- 
tures, and the conventions used in syntax notation. It also lists addi- 
tional sources of information about programming in BASIC. 


Chapter 1, “Microsoft BASIC with the CP/M Operating System,” tells you © 
how to initialize your implementation of Microsoft-BASIC and explains =~ 
any differences between the features in your implementation and those 
described in the Reference Manual. 


Chapter 2, “Converting Programs to Microsoft BASIC,” describes the — 
minor adjustments necessary when converting programs written in other 
BASICs to Microsoft-BASIC. 


Chapter 3, “Cartridge File Hennig,” explains cartridge file handling 
procedures. This chapter can be read as an overview or used for ref- 
erence if you encounter cartridge-related errors while running BASIC. 


Chapter 4, “Microsoft BASIG Assembly Language Subroutines,” pro- 
vides information about calling assembly language subroutines. 


Syntax Notation 


The following notation is used throughout this manual in descriptions of 
command and statement syntax: 


[ ] Square brackets indicate that the enclosed entry is op- 
tional. 
< > Angle brackets indicate user-entered data. When the angle 
brackets enclose lowercase text, the user must type 
in an entry defined by the text; for example, <filename>. 
When the angle brackets enclose uppercase text, the 
user must press the key named by the text; for example, 
<RETURN>. | 
{ } Braces indicate that the user has a choice between twoor . 
more entries. At least one of the entries enclosed in braces: 
must be chosen unless the entries are also enclosed in 
square brackets. 
Vertical bars separate choices within braces. At least one 
of the entries separated by bars must be chosen unless the 
entries are also enclosed in square brackets. 
Ellipses indicate that an entry can be repeated as many 
times as needed or desired. 
CAPS Capital letters indicate portions of statements or commands 
that must be entered, exactly as shown. 


All other punctuation, such as commas, colons, slash marks, and equal 
signs, must be entered, exactly as shown. 


Learning More about BASIC 7 


The manuals in this package provide complete reference information 

for your implementation of Microsoft BASIC. They do not, however, 

teach you how to write programs in BASIC. If you are new to BASIC or Cc} 
need help in learning to program, we Suggest you read one of the © 
following books: | _ | 


Billings, Karen and Moursund, David. Are You Computer Literate? 


Beaverton, Oregon: Dilithium Press, 1979. 


Albrecht, Robert L., Finkel, LeRoy, and Brown, Jerry. BASIC. 
New York: Wiley Interscience, 2nd ed., 1978. 7 


Coan, James. Basic BASIC. Rochelle Park, N. J.: Hayden Book 
Company, 1978. 


Dwyer, Thomas A. and Critchfield, Margot. BASIC and the Per- 
sonal Computer. Reading, Mass.: Addison Wesley Publishing 
Company, 1978. 


Simon, David E. BASIC From the Ground Up. Rochelle Park, N. © 
J.: Hayden Book Company, 1978. 3 
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CHAPTER 1 


MICROSOFT BASIC WITH THE CP/M COMPATIBLE 
OPERATING SYSTEM (I/OS) | 


1.1 How to Initialize Microsoft BASIC 
1.2 How to Exit Microsoft BASIC 
1.3 File Naming Conventions 


1.4 Microsoft BASIC Language Differences for the RoadRunner 


1.4.1 FILES Command 
1.4.2 LOF Function 

1.4.3 RESET Command 
1.4.4 KEY $(X) Function 
1.4.5 KEY $(X) Statement 
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This chapter tells you how to initialize BASIC in the ecatedeciil 
1.1 HOW TO INITIALIZE MICROSOFT BASIC 
To initialize BASIC or to run an application program: 

a.) Insert BASIC lil into — (A through D). 


b.) Insert Data cartridge or an application program (if you have 
one), into an empty slot. 


c.) Hit any key so the Roadrunner can identify the locations of the 
cartridges. 


_d.) Press the Function Key (F1 through F8) which corresponds to 
BASIC or to the application program, (if one has been inserted). 


If BASIC is selected, the display will show: 


- MicroOffice RoadRunner ~ BASIC Menu (BASIC o.nn) 


Copyright 1977-1982 © by Microsoft 
nnnnn Bytes free 

Ok 
RUN< LIST SAVE “ LOAD” CONT< LLIST ize slken BREAK | 


Fi F2 F3  F4 F5 FO F7__ FB 


If an application program was selected, the application will load and run 
when the function key is pressed. | 


Once initialized, the BASIC cartridge can be oe 
- NOTE 


The function keys are Pie neaenmes to the commands displayed | 
above. | | 


1.2 HOW TO EXIT MICROSOFT BASIC 


To exit BASIC and return to the Main menu, press EXIT key or type 
SYSTEM. This closes all files and then reloads operating system into 
memory without deleting any existing programs or data (i.e., performs a 
“warm start”). Note that aa CMD-C, when executed within BASIC, fetus 
to Microsoft BASIC command level, not to I/OS. 


1.3 FILE NAMING CONVENTIONS 


Filenames conform to standard naming conventions. All filenames can 
include A:, B:, C:, or D: as the first characters to specify a slot; otherwise, 
the currently selected slot is assumed. A default extension of .BAS is 
appended to LOAD, SAVE, MERGE, and RUN <filename> commands 
if no period (.) appears in the filename and the filename is less than nine 
characters long. 


Examples RUN “NEWFILE.EXE” 
RUN “A:NEWFILE.EXE” | 
SAVE “NEWFILE” (file is SAVEd with 
.BAS extension) 


1.4 MICROSOFT BASIC LANGUAGE DIFFERENCES FOR 
THE ROADRUNNER 


Additional features are to be incorporated. Information pertaining to 
these features will be supplied as available. 


1.4.1 FILES ean | 


This CP/M rplamenclen: of Microsoft BASIC for the RoadRunner 


_ includes a FILES command, which prints the names of files on the 


current cartridge. This command is not described in the Reference 


Manual. 
Syntax | 
Purpose 


Remarks 


Examples 


FILES[<tfilename>] 
To print the names of files residing on the current cartridge. 


If <filename> is omitted, all files on the cartridge in the 
currently selected slot will be listed. <filename> is a string 
formula which can contain question mark (?) “wild cards” 
to match any character in the filename or extension. An 
asterisk (*) as the first character of the filename or exten- 
sion will match any file or any extension. 


FILES Lists all files on cartridge in 
currently selected slot 
FILES “*.BAS” Lists all files with extension 
| -BAS on cartridge in currently 
selected slot 
FILES “B:*.*” Lists all files on cartridge in slot B. 


FILES “TEST?.BAS’ Lists all files with names that begin 
with TEST and end with .BAS on 
the currently selected slot 


1.4.2 LOF Function © 


The LOF (length-of-file) function is available in this version of Microsoft- 
BASIC. This function is not described in the Reference Manual. 


Syntax 


Action 


Example 


LOF(<file number>) 


Returns the number of 128-byte records present in the last 
“extent” (128 records) read or written. If the file does not 
exceed one extent, LOF returns the true length of the file. 


110 IF NUM%Z>LOF(1) THEN PRINT 
'' INVALID ENTRY'' 


1.4.8 RESET Command 


The RESET command is available in this version of Microsoft-BASIC 


and can be executed by pressing Function key F7 until F7 is changed. 


Syntax 


Purpose 


Remarks 


RESET 


To execute a cartridge system reset. After cartridges are 


exchanged in a slot, RESET must be executed before 
reading or writing to the new cartridge. 


The RESET command also closes all open files on all 
cartridges and writes the updated directory information to 
the affected cartridges. 


1.4.4 -KEY $(X) Function 


‘The key $(X) function is available in this version of Microsoft BASIC for 
the RoadRunner. It is used to access the current value of function key x. 


Syntax 


Action 


Example 


10 


KEY $(X) where X is a numerical expression which evalu- 


| ates to 1, 2, 3, 4, 5, 6, 7, or 8. 


A value outside this range will cause a “Function Call — 


Error.” This number indicates which function key you wish 
to examine, as they are numbered on the key tops. It will 
return a string from O to 10 characters in length, which is 
what would be entered if the user hit the function key 
himself. 


You want to know (in your program) what Function Key 1 
will enter-ef it is typed. (We assume you have not modified 
the key yet.) | 

100 X$ = KEY $ (1) 


will set the variable X$ to contain the string “LIST” since 
that is what is displayed when the user hits function key 1. 


_ KEY $(X) can also be used like any other string variable or 


function in formulas: 


110 X$ = ''HI THERE! FUNCTION KEY 4IS'' 
+KEY$(4)+'', OKAY?''! | 
120 PRINT '' FUNCTION KEY 3 IS''; KEY $(3) 


1.4.5 KEY $(X) Statement 


The KEY $(X) statement is available in this version of Microsoft BASIC. It 
is used to change the value of a function key. 


Syntax 


Action — 


Example 


KEY $(X) = string-expression where x is a numerical ex- 
pression which evaluates to 1, 2, 3, 4, 5, 6, 7, or 8. 


A value outside this range will cause a “Function Call 
Error.” A ‘String-expression’ is any string formula or con- 
stant. Length may be from 0 to 10 characters; if itis longer | 
than 10, the string will be truncated to 10 characters before 
itis used. — 


Function key X will be assigned the string-expression, and, 
until changed, will enter the string-expression when typed. 


When MENU key on the RoadRunner is pressed, your 


changes will be shown. 


To change Function Key 2 to enter RUN without carriage © 
return: | , 


100 KEY$(2) = ''RUN'' 


To change Function Key 2 to enter RUN with carriage 
return: 


110 KEY$(2) = ''RUN'' + CHR$(13) 
To make a function key do nothing: 


120 KEY$(5) = '' '! 


Note: “ ” is the null string 


If you try to put more than 10 characters into a key, i.e.: 

130 KEY$(3) = ''012345678998765435210'! 

and then _ 7 @ | 
PRINT KEY$(3) | . 8. 


you will get only 0123456789. 


@ 
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2.2 


2.3 


2.4 


CHAPTER 2 
CONVERTING PROGRAMS TO MICROSOFT BASIC 
String Dimensions | 
Multiple Assignments. 


Multiple Statements 


MAT Functions 


If you have programs written in a BASIC other than Microsoft BASIC, 
some minor adjustments may be necessary before they can be run with 
the Microsoft-BASIC Interpreter. This chapter lists some specific things _ 
to look for when converting BASIC programs. 


2.1 STRING DIMENSIONS 


Delete all statements that are used to declare the length of strings. A 
Statement such as DIM A§(I,J), which dimensions a string array for J 
elements of length |, should be converted to the Microsoft-BASIC state- 
ment DIM A$(J). ee aia _ 


Some BASICs use a comma or ampersand for string concatenation. 
Each of these must be changed to a plus sign, which is the operator for 
Microsoft-BASIC string concatenation. — 


In Microsoft-BASIC, the MID$, RIGHTS, and LEFT$ functions are used 
to take substrings of strings. Forms such as A$(I) to access the Ith 


_Character in A$, or A§(I,J) to take a substring of A$ from position | to 


position J, must be changed as follows: 


Other BASIC Microsoft BASIC 
XP=AG(I) X$=MID$(A$,I,1) | 
X$=A$(I,J) - X$=MID$( A$, I, J-I+1) 
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_ If the substring reference is on the left side of the assignment operator 
and X$ is used to replace characters in A$, convert as follows: — 


Other BASIC Microsoft BASIC | e 
A$(1I)=X$ MID$(A$,I,1)=X$ _ 


A$(I,J) =X$ MID$ (A$, 1I,J-I +1) =X$ — 
2.2 MULTIPLE ASSIGNMENTS 
Some BASICs allow statements of the form 

~ 10 LET B=C=0 

_ to set B and C equal to zero. Microsoft-BASIC would interpret the second 
equal sign as a logical operator and set B equal to -1 if C equalled 0. In 
Microsoft-BASIC, use a separate statement to define each variable. For 
example, convert the above statement to: 

10 C=0:B=0 
2.3 MULTIPLE STATEMENTS C3 
Some BASICs use a backslash (\) to separate multiple statements on 
a line. With Microsoft-BASIC, be sure all statements on a line are sepa- 
rated by acolon (:). — | 


2.4 MAT FUNCTIONS 


Programs using the MAT functions available in some BASICs must be 
rewritten using FOR...NEXT loops. 
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3.1 
3.2 
3.3 


3.4 


CHAPTER 3 
CARTRIDGE FILE HANDLING 


Filenames 
Program File Commands 
Protected Files | 


Cartridge Data Files—Sequential and Random Access 


3.4.1. Sequential Access Files 


3.4.1.1 Creating a Sequential Access File 
3.4.1.2 Adding Data to a Sequential Access File 


3.4.2 Random Access Files 


3.4.2.1 Creating a Random Access File 
3.4.2.2 Accessing a Random Access File 
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Procedures for handling cartridge files are explained in this chapter. This 
information can also be useful if you are encountering cartridge-related 
errors while running Microsoft-BASIC. _ fe | | 


Se epee 


3.1 FILENAMES 


Wherever a filename is required in a cartridge command or statement, 
use a name that conforms to your operating system‘s requirements for - 
filenames. As explained in Chapter 1, standard CP/M filenames can 
begin with A: or B: to specify the slot where a file is located; otherwise, the 
currently selected slot is assumed. In addition, the operating system will 
append a default extension .BAS to the filename given in a SAVE, RUN, 
MERGE, or LOAD command, if the filename contains no periods (.) and 
is less than 9 characters long. 


Examples: B:NEWFILE.BAS | 
DATAFILE. DAT (current slot is assumed) 
NEWFILE _ (current slot is assumed; .BAS 
| extension will be appended with 
SAVE, RUN, MERGE, or LOAD 
commands) 
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3. 2 bibs lesici FILE COMMANDS | 


The lowing commands are used to wanigutate program ise: When 

used with these commands, <filename> must be enclosed in quotation 

marks. Each of these commands is discussed in detail in Chapter 2 of the - © 
Microsoft BASIC aalerence ance 


| SAVE : '<filename>' a A] Writes to the cartridge the program 
that currently resides in memory. Op- 
tional A writes the program as a se- 

~ ries of ASCII characters. (Otherwise, 

BASIC uses a compressed binary for- 
mat.) 
(See “Protected Files,” Section 3.3, 
for a discussion of how to SAVE pro- 
tected files.) | 


LOAD ''<filename>''[,R] Loads the program from cartridge into 
| memory. Optional R runs the pro- 
gram immediately. LOAD always de- 
letes the current contents of memory | 
and closes all files before LOADing. If - © 
Ris included, however, open data files 
are kept open. Thus programs can be 
chained or loaded in sections and can 
access. the same data files. (LOAD 
“<filename>”,R and RUN “<file- 
name>”,R are equivalent.) 


RUN ''<filename>''[,R] 


MERGE ''<filename>'' 


KILL ''<filename>'' 


NAME ''<oldfilename>'' 
AS ''<newfilename>'' 


Loads the program from cartridge 
into memory and runs it. RUN deletes 
the current contents of memory and 


_ Closes all files before loading the pro- 


gram. If the R option is included, how- 
ever, all open data files are kept open. 
(RUN “<filename>”,R and LOAD. 


_ “<filename>”,R are equivalent.) 


Loads the program from cartridge into 
memory but does not delete the cur- 
rent contents of memory. The pro- 
gram line numbers on cartridge are 
merged with the line numbers in 
memory. If two lines have the same 
number, only the line from the car- 
tridge program is saved. After a 
MERGE command has been execut- 
ed, the “merged” program resides in 
memory, and BASIC returns to com- 
mand level. 


Deletes the file from the cartridge. 


<filename> can be a program file, a 


sequential access data file, or a ran- 


dom access data file. The file exten- 
sion must be included in the <file- 
name>. 


Changes the name of a cartridge file. 
NAME can be used with program files, 
random access files, or sequential 
access files. The file extension must 
be included in both filenames. 
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3.3 PROTECTED FILES 


if you wish to save a program in an encoded binary format, use the 
“Protect” option with the SAVE command. 


For example: = 


SAVE ''MYPROG'',P 


‘Warning Because a program saved this way cannot be listed or edited, 
~ you may also want to save an unprotected copy of the pro- 
gram for listing and editing. 


3.4 CARTRIDGE DATA FILES—SEQUENTIAL AND 
RANDOM ACCESS 


Two types of cartridge data files can be created and accessed by an 
Microsoft-BASIC program: sequential access files and random access 
files. Both are described in the following sections. 


3.4.1 Sequential Access Files 


Sequential access files are easier to create than are random access files, 
but they are limited in flexibility and speed when it comes to accessing 
data. Data is written to a sequential file as ASCII characters. These 
characters are stored, one after another (sequentially), in the order they 
are sent. They are read back the same way. 


The statements and functions that are used with sequential files are: 


OPEN 

PRINT# 
PRINT# USING 
WRITE# 
INPUT# 

LINE INPUT# 
EOF 

LOC 


CLOSE © 


See Chapters 2 and 3 of the Microsoft BASIC Reference Manual for a 
more detailed discussion of these commands. 
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3.4.1.1 Creating A Sequential Access File 


The following program steps are ee to create a sequential file and 
access the data in the file: : 


1. OPEN the file in “O” mode. OPEN ''0'', #1," 'DATA'! 
2. Write data to the file ‘WRITE#1, A$: BS: C$ 
using the WRITE# | 


statement. (You can use © 
PRINT# instead, but 
consult Section 2.51 in 
the Reference Manual 
before doing so.) 


3. To access the data in the CLOSE #1 
file, you must CLOSE the OPEN ''I'', #1,''DATA''! 
file and reOPEN it in “I” 3 
mode. 


4. Use the INPUT# statement INPUT#1,X%, Y$, Z$ 


to read data from the 
_ sequential file into the 
program. 


A program that creates a sequential file can also write formatted data to _ 


the cartridge with the PRINT# USING statement. For example, the 
statement 


PRINT#1,USING'' ####.##,'';A,B,C,D 

could be used to write numeric data to cartridge without explicit de- 
limiters. The comma at the end of the format string separates the items in 
the cartridge file. 

The LOC function, when used with a sequential file, returns the number 
of sectors that have been written to or read from the file since it was 
OPENed. For example, 


100 IF LOC(1)>50 THEN STOP 
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would end program execution if more than 50 sectors had been written to 
or read from file #1 since it was OPENed. 


Program 1 creates a sequential file, named “DATA,” from information 
you men at the terminal. 


Program 1—Create a Sequential Data File 


10 OPEN ''0O'',#1,''DATA'' 

20 INPUT ''NAME'' ; N$ 

25 IF N$=''DONE'' THEN END 

30 INPUT ''DEPARTMENT' ' ;D$ 

40 INPUT ''DATE HIRED'' > H$ 

50 PRINT#1,N$;'','';D$;'','';H$ 
60 PRINT: GOTO 20 

RUN 

NAME? MICKEY MOUSE 
DEPARTMENT? AUDIO/VISUAL AIDS 
DATE HIRED? 01/12/72 

NAME? SHERLOCK HOLMES 
DEPARTMENT? RESEARCH 

DATE HIRED? 12/03/65 : 
NAME? EBENEEZER SCROOGE | CS 
DEPARTMENT? ACCOUNTING 

DATE HIRED? 04/27/78 

NAME? SUPER MANN 

DEPARTMENT? MAINTENANCE 

DATE HIRED? 08/16/78 — 

NAME? etc. 


Program 2 accesses the file “DATA” that was created in Program 1 and 
displays the name of everyone hired in 1978. 


Program 2—Accessing a Sequential File 


10 OPEN ''I'',#1,'‘DATA'' 

20 INPUT#1,N$,D$,H$ 

30 IF RIGHT$(H$,2)=''78'' THEN PRINT N$ 
40 GOTO 20 


RUN © 
EBENEEZER SCROOGE | | Ss 
SUPER MANN 

Input past end in 20 

Ok 
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Program 2 reads, sequentially, every-item in the file. When all the data 
has been read, line 20 causes an “Input past end” error. To avoid getting 
this error, insert line 15, which uses the EOF function to test for enor 
file: 


15 IF EOF(1) THEN E END 

Then change line 40 to: 

40 GOTO 15 

3.4.1.2 Adding Data To A pede Access File 


Data can be appended to an existing soquetiial access file. It is impor- 
tant, however, to follow carefully the procedure given below. 


Warning _ If you have a sequential access file residing on panidae and 
later want to add more data to the end of it, you cannot simply 
open the file in “O” mode and start writing data. As soon as 
you open a sequential access file in “O” mode, you vor its 
current contents. 


The following procedure mn add Gata toan nexisting file called “NAMES”: 


OPEN “NAMES” in “I” fade: | 
OPEN a second file called “COPY” in “O” mode. 
Read in the data in “NAMES” and write it to “COPY.’ ‘ 
CLOSE “NAMES” and KILL it. 
Write the new information to “COPY.” 
~ Rename “COPY” as “NAMES” and CLOSE it. | 
Now there is a file on cartridge called “NAMES” that includes all 
the previous data plus the data you just added. — 


SB Ne 


Program 3 illustrates this technique. It can be used to create or add onto 
a file called NAMES. This program also illustrates the use of LINE 
INPUT # to read strings with embedded commas from the cartridge file. 
Remember, LINE INPUT# will read in characters from the cartridge until 
it sees a carriage return (it does not stop at quotation marks or commas) 
or until it has read 255 characters. 
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2000 


2010 


Program 3—Adding Data toa eon File 


ON ERROR GOTO 2000 

OPEN ''I'',#1,''NAMES'' 
REM IF FILE EXISTS, WRITE IT TO” eens: 
OPEN ''0O'',#2,''COPY'' 

IF EOF(1) THEN 90 

LINE INPUT#1, AG 

PRINT#2, AG 

GOTO 50 

CLOSE #1 

KILL ''NAMES'' 

REM ADD NEW ENTRIES TO PILE 


| INPUT ''NAME'' ;N$ 


IF N§6='' '' THEN 200 ‘CARRIAGE RETURN EXITS INPUT > 
LOOP — 

LINE INPUT '' ADDRESS? ''; A$ _ 

LINE INPUT ''BIRTHDAY? '';B$ 

PRINT#2, NG 

PRINT#2, A$ 

PRINT#2, BS 

PRINT: GOTO 120 | 

CLOSE | 

REM CHANGE FILENAME BACK TO ''NAMES'' 

NAME ''COPY'' AS''NAMES'' 

IF ERR=53 AND ERL=20 THEN OPEN ''0'', #2, ‘COPY? 
RESUME 120 

ON ERROR GOTO 0 


The error handling routine in line 2000 traps a “File not found” error in line 
20. If this happens, the statements that copy the file are skipped, and 
“COPY” is created as if it were a new file. 
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3.4.2 Random Access Files > 


Creating and accessing random access files requires more program 
steps than for sequential access files. However, there are advantages to 
using random access files, one of which is that random access files 
require less room on the cartridge, because Microsoft-BASIC stores 
them in packed binary format. (A sequential access file is stored as a 
series of ASCII characters.) 


The biggest advantage of using random access files is that data can be 
accessed randomly, i.e., anywhere on the cartridge—it is not necessary 
to read through all the information, as with sequential access files. This 
is possible because the information is stored and accessed in distinct 
units called records and each record is numbered. 


CP/M versions 2.0 or later support large random access files. The 
maximum number of logical records is 32,767. If a record size of 256 is 
specified with the OPEN command (see Section 3.4.2.1), files up to 8 
megabytes can be accessed. 


The statements and functions that are used with random access files are: 


OPEN 
FIELD 
LSET/RSET 
GET 
PUT 
CLOSE 
LOC 
MKD$ 
MKI$ 
MKS$ 
CVD 
CVIe' 


— CVS 


See Chapters 2 and 3 of the Reference Manual for detailed discussion of 
these statements and functions. 
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— 3.4.2.1 Creating A Random Access File 
_ The following program steps are required to create a random access file. 


1. OPEN the file for random — OPEN ''R'', #1, 
access (in “R” mode). This — ''PILE'", 32 | © 
example specifies a record | ™ 
length of 32 bytes. If the 
_ record length is omitted, 
the default is 128 bytes. 


2. Use the FIELD statement to FIELD #1,20 AS NG, 
allocate space in the 4 AS A$,8 AS P$ 
random buffer for the 
variables that will be written | 
to the random access file. 


3. UseLSET to move the data LSET N$=X$ 
into the random buffer. LSET A$=MKS$( AMT ) 
Numeric values must be LSET P$=TEL$ 
made into strings when | | 
placed in the buffer. To | 
do this, use the “make” © 


functions: MKI$ to make an 
integer value into a string, 
MKSS$ for a single precision 
value, and MKD$ for a 
double precision value. 


4. Write the data from the PUT #1,CODEZ 
buffer to the cartridge 
using the PUT statement. 


The LOC function with random files returns the “current record number.” 
For example, the statement 


IF LOC(1)>50 THEN END 


ends program execution if the current record number in file#1 is higher . 
~ than 50. | | © 
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Program 4 writes information that is input at the terminal toa random 
access me 


Program 4—Create a Random File 


10 OPEN “R”,#1,“FILE”’,32 

20 FIELD #1,20 AS N$,4 AS AG$,8 AS Pg 
30 INPUT “2-DIGIT CODE” ;CODE% 
40 INPUT “NAME”;X$ 

50 INPUT “AMOUNT”;AMT — 

60 INPUT “PHONE”;TEL$:PRINT | 
70 LSET N$=X$ 

80 LSET A$=MKS$(AMT) | 

90 LSET P$=TEL$ 

100 PUT #1,CODE% 

110 GOTO 30 - 


Each time the PUT statement is executed, a record is written to the file. 
The two-digit code that is input in line 30 becomes the record number. 


Warning Do not use a FIELDed string variable in an INPUT statement 
or in the left side of an assignment statement. This causes the 
pointer for that variable to point into string space instead of 
into the random access file buffer. 


3.4.2.2 Accessing A Random Access File | 


The following program steps are required to access a random access 


file: | 

1. OPEN the file in “R” mode. OPEN ''R'', #1, C 
| + AAP TEL oso | 

2. Use the FIELD statement to FIELD #1,20 AS NQ, : 


~ allocate space in the 4 AS A$,8 AS PG 
random buffer for the | 
variables that will be read 
from the file. 


Note Inaprogram that performs both input and output on the same 
random access file, you can often use just one OPEN state- 
ment and one FIELD statement. 


3. Use the GET statement to GET #1,CODEZ 
the desired record into the 
random buffer. 


4. The data in the buffer may PRINT N$ | & 
now be accessed by the PRINT CVS(A$) | 
program. Values that were _ “ 
made into strings when 
placed in the buffer (see 
“LSET,” Section 3.4.2.1) 
must be converted back to 
numbers using the 
“convert” functions: 

CVI for integers, CVS for 

single precision values, and 

CVD for double precision 

values. | 
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Program 5 accesses the random access file “FILE” that was created in 
Program 4. When the two-digit code set up in Program 4 is input, the 
information associated with that code is read from the file and displayed. 


Program 5—Access a Random File 


10 OPEN ''R'',#1,''FILE'* 32 © | 

20 FIELD #1,20 ASNG,4 AS A$,8 AS PH 
30 INPUT ''2-DIGIT CODE'' ; CODE% 

40 GET #1, CODEZ 

50 PRINT N$ eo 

60 PRINT USING ''$$###.##'' > CVS(Ag) 
70 PRINT P$: PRINT 

80 GOTO 30 


Program 6 is an inventory program that illustrates random file access. In 
this program, the record number is used as the part number. It is as- 
sumed that the inventory will contain no more than 100 different part 
numbers. | 


Lines 900-960 initialize the data file by writing CHR$(255) as the first 
character of each record. This is used later (line 270 and line 500) to 
determine whether an entry already exists for that part number. 


Lines 140-210 display the different inventory functions that the pro- 
gram performs. When you type in the desired function number, line 230 
branches to the appropriate subroutine. 


Program 6—Inventory 


120 OPEN''R'', #1,''INVEN.DAT'' 39 | 
130 FIELD#1,1 AS F$,30 AS D$,2 AS Q$,2 AS R$,4 AS P$ 
140 PRINT: PRINT !' FUNCTIONS: '':PRINT 
150 PRINT 1,'! ‘INITIALIZE FILE'' 
160 PRINT 2, ''CREATE A NEW ENTRY! ' : 
170 PRINT 3, ' ‘DISPLAY INVENTORY FOR ONE PART! ' 
180 PRINT 4, ''ADD TO STOCK'' _ 
190 PRINT 5, ''SUBTRACT FROM STOCK''! | 
200 PRINT 6, ''DISPLAY ALL ITEMS BELOW REORDER LEVEL' ! 
210 PRINT: PRINT: INPUT! 'FUNCTION' '; FUNCTION 
220 IF (FUNCTION<1)OR(FUNCTION>6) THEN PRINT 
_ '' BAD FUNCTION NUMBER'':GOTO 140 
250 ON FUNCTION GOSUB 900, 250, 390, 480,560,680 
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240 GOTO 210 

250 REM BUILD NEW ENTRY 

260 GOSUB 840 

270 IF ASC(F%)<>255 THEN INPUT! ‘OVERWRITE'': Ag: @ 

IF A$?<>''Y'' THEN RETURN | | 

280 LSET F$=CHR$ (0) 

290 INPUT ''DESCRIPTION' ' ; DESC$ 

300 LSET D$=DESC$ 

310 INPUT '' QUANTITY IN STOCK'' ;Q% 

320 LSET Q$=MKI$ (QZ) 

330 INPUT ''REORDER LEVEL'' ;R% 

340 LSET R$=MKI$(R&) 

350 INPUT ''UNIT PRICE'';P 

360 LSET P$=MKS$(P) 

370 PUT#1, PARTZ 

380 RETURN 

390 REM DISPLAY ENTRY 

400 GOSUB 840 

410 IF ASC(F$)=255 THEN PRINT ''NULL ENTRY' ' : RETURN 

420 PRINT USING ''PART NUMBER ###''; PARTZ 

430 PRINT D$ | ©) 
440 PRINT USING '' QUANTITY ON HAND #####' '; CVI(Q$) 

450 PRINT USING ' ‘REORDER LEVEL #####' ';CVI(R$) 

460 PRINT USING ''UNIT PRICE E SS##. ##'' = CVS(P$) 

470 RETURN 

480 REM ADD TO STOCK 

490 GOSUB 840 

500 IF ASC(F$)=255 THEN PRINT ''NULL ENTRY'' : RETURN 

510 PRINT D$: INPUT '' QUANTITY TO ADD ''; AZ 

520 QZ=CVI1(Q$) +AZ 

530 LSET Q$=MKI$(Q%) 

540 PUT#1, PART% 

550 RETURN 

560 REM REMOVE FROM STOCK 

5770 GOSUB 840 

580 IF ASC(F%)=255 THEN PRINT ''NULL ENTRY'' : RETURN 

590 PRINT D$ Poa 
600 INPUT '' QUANTITY TO SUBTRACT'' ;SZ% C3 
610 QZ=CVI1 (QF) | | : 
620 IF (Q%-S%) <O THEN PRINT ' 'ONLY'';Q%;'' INSTOCK' ' : GOTO600 
630 Q%=Q%-S% 

640 IF QZ=<CVI(R$) THEN PRINT '' QUANTITY NOW'' 0%: 
| '' REORDER LEVEL' ' ; CVI (R$) 
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650 LSET Q$=MKI$¢ (QZ) 

660 PUT#1,PARTZ - 

670 RETURN 

680 REM DISPLAY ITEMS BELOW REORDER LEVEL 

690 FOR I=1 TO 100 

710 GET#1,I 

720 IF CVI(Q$)<CVI(R$) THEN PRINT Dg: |! QUANTITY''; 
CVI(Q$) TAB(50) ' 'REORDERLEVEL '' > CVI (R$) 

7350 NEXT I | 

740 RETURN 

840 INPUT ''PART NUMBER' ' ; PART 

850 IF (PARTZ<1 ) OR( PARTZ>100 ) THENPRINT ' ‘BADPARTNUMBER' ' - 

| GOTO 840 ELSE GET#1, PARTY: RETURN 

890 END 

900 REM INITIALIZE FILE 

910 INPUT ''ARE YOU SURE'' ;B$: IF B§<>''Y'' THEN RETURN 

920 LSET F$=CHR$ (255 ) 

950 FOR I=1 TO 100 

940 PUT#¥1,I 

950 NEXT I 

960 RETURN 
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CHAPTER 4 
MICROSOFT BASIC ASSEMBLY LANGUAGE SUBROUTINES 
© - 4.1 Memory Allocation | 


4.2 USR Function Calls. 


43 CALL Statement 
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All versions of Microsoft BASIC provide interfacing with assembly lan- 
guage subroutines with the USR function and the CALL statement. 


_ The USR function allows assembly language subroutines to be called in 
the same way BASIC intrinsic functions are called. (See Chapter 3 of the 
Microsoft BASIC Reference Manual fora discussion of intrinsic func- 

tions. ) | 


The CALL statement, however, is the recommended method of interfac- 
ing assembly language subroutines. It is compatible with more lan- 
guages than is the USR function call, it produces more readable source 
code, and it can pass multiple arguments. The calling sequence is the 
Same as that for Microsoft(TM) FORTRAN, Microsoft(TM) COBOL, and 
Microsoft BASIC Compilers. 
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: 4.1 MEMORY ALLOCATION 


Memory space should be set aside for an assembly language subroutine 
before it is loaded. To do so, use the /M: switch during initialization (see 
- Chapter 1) to enter the highest memory location minus the amount of 
memory needed for the assembly language subroutine(s). Microsoft 
BASIC uses all memory available from its starting location upwards, so 
only the topmost locations in menor can be set aside for user subrou- 
tines. | 


It is important to avoid stack overflow when calling assembly language 
subroutines. Therefore, if additional stack space is needed when an 
assembly language subroutine is to be called, the Microsoft BASIC stack 
can be saved and a new stack set up for use by the assembly language 
subroutine. The Microsoft BASIC stack must be restored, however, be- 
fore returning from the subroutine. 


The assembly language subroutine can be loaded into memory by 
means of the operating system or the Microsoft-BASIC POKE statement. 
If the user has the Microsoft(TM) Macro Assembler, routines can be 
assembled with the Macro Assembler and loaded using the Micro- 
soft(TM) LINK Linking Loader. 
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4.2 USR FUNCTION CALLS 
The syntax of the USR function is: 
USR[ <digit> ](argument) 


where <digit> is any number from 0 to 9 and the argument is any 
numeric or string expression. <digit> specifies which USR routine is 
being called and corresponds to the digit supplied in the DEF USR 
Statement for that routine. If <digit>.is omitted, USRO is assumed. The 
address given in the DEF USR statement determines the starting ad- 
dress of the subroutine. __ 


When the USR function call is made, register A contains a value that 
specifies the type of argument that was given. The value in A and its 
corresponding type of argument can be one of the following: 


Value in A Type of Argument 
2, Two-byte integer (two‘s complement) 
eS String a 
4 . Single precision floating-point number 
8 Double precision floating-point number 


If the argument is a number, the HL register pair points to the Floating- 
point Accumulator (FAC) where the argument is stored. 


If the argument is an integer: 
FAC +0 contains the lower 8 bits of the argument. 


FAC+1 contains the upper 8 bits of the argument. 
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If the argument is a single precision floating-point number: 
FAC+0 contains the lowest 8 bits of mantissa. 
FAC+1 contains the middle 8 bits of mantissa. 
FAC+2 contains the highest 7 bits of mantissa with leading 1 © 
suppressed (implied). Bit 7 is the sign of the number (O=positive, 
—1= pegetye) 7 


FAC+3 1 is the exponent minus 128. The binary point is to the left of 
the most significant bit of the mantissa. 


If the argument is a double precision floating-point number: 


FAC-4 through FAC-1 contain four more bytes of mantissa than the 
single precision argument (FAC-4 contains the lowest 8 bits). 


lf the argumentis a string, the DE register pair points to 3 bytes called the 
“string descriptor.” Byte 0 of the string descriptor contains the length of 
the string (0 to 255 characters). Bytes 1 and 2, respectively, are the lower 
and upper 8 bits of the string starting address in string space. S 


Warning If the argument is a string literal in the program, the string 
descriptor will point to program text. To avoid altering or 
destroying your program this way, add + “ ” to the string 
literal in the program. 

For example: 
A$=''BASIC''! ae ii 1 


This will copy the string literal into string space and prevent 
alteration of program text during a subroutine call. 
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Usually, the value returned by a USR function is the same type (integer, 
String, single precision, or double precision) as the argument that was 
passed to it. However, calling the MAKINT routine returns the integer in 
HL as the value of the function, forcing the value returned by the function 
to be an integer. To execute MAKINT, use the following sequence to 
return from the subroutine: 


PUSH 4H ;Save value to be returned 


LHLD xxx ;get address of MAKINT routine 
XTHL | . 3save return on stack and 

| ;get back HL | 
RET jreturn 


Also, the argument of the function, regardless of its type, can be forced to 
an integer by calling the FRCINT routine to get the integer value of the 
argument in HL. To execute FRCINT, use the following routine: 


LXI H,SUB1 ;get address of subroutine 
;continuation 
PUSH  H _;place on stack 
LHLD xxx ;get address of FRCINT 
_ PCHL . 
UCL 6 ase 3 
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4.3. CALL STATEMENT 


Assembly language subroutine calls can also be made with the CALL 
statement. The syntax is: 


CALL <variable name>[ (<argument list>)] i 


where <variable name> contains an address that is the starting point in 
memory of the subroutine. <variable name> cannot be an array variable 
name. <argument list> contains the arguments that are passed to the 
external subroutine. <argument list> can contain only variables. 


A Microsoft-BASIC CALL statement with no arguments generates a 
simple 8080 “CALL” instruction. The corresponding subroutine should 
return with a simple “RET.” (CALL and RET are 8080 opcodes—see an 
8080 microprocessor reference manual for details.) 


A subroutine CALL with arguments results in a more complex calling 
sequence. For each argument in the CALL argument list, a parameter is 
passed to the subroutine. That parameter is the address of the low byte 
of the argument. Therefore, parameters always occupy two bytes each, 
regardless of type. 


The method of passing parameters depends upon the number of param- 
eters to pass: | 


1. If the number of parameters is less than or equal to 3, they are 
passed in the registers. Parameter 1 will be in HL, 2 in DE (if 
present), and 3 in BC (if present). 


2. Ifthe number of parameters is greater than 3, they are passed as 
follows: 


Parameter 1 in HL. 
Parameter 2 in DE. 
Parameters 3 through n in a contiguous data block. BC will point 


to the low byte of this data block (i.e., to the low byte of parameter 
3). | 
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Note that with this scheme, the subroutine must know how many param- 

eters to expect in order to find them. Conversely, the calling program is 
responsible for passing the correct number of parameters. There are no 
checks for the correct number or type of parameters. 


If the subroutine expects more than 3 parameters and needs to transfer 
them to a local data area, a system subroutine named $AT will perform 
this transfer. The $AT routine is listed below (it is located in the Microsoft 
FORTRAN library, FORLIB.REL). The routine is called with HL pointing 
to the local data area, BC pointing to the third parameter, and A contain- _ 
ing the number of arguments to transfer (i.e., the total number of argu- 
ments minus 2). 


The subroutine is responsible for saving the first two parameters before 
calling $AT. For example, if a subroutine expects 5 parameters, it should 
look like this: 


SUBR: SHLD Pl ; SAVE PARAMETER 1 
XCHG 
SHLD P2 ; SAVE PARAMETER 2 
MVI A,3 ;NO. OF PARAMETERS LEFT 
Tekd HPS ; POINTER TO LOCAL AREA 
CALL © SAT ; TRANSFER THE OTHER 3 
PARAMETERS 
[Bodyofsubroutine ] 
RET ; RETURN TO CALLER 
Pd: DS 2 ; SPACE FOR PARAMETER 1 | 
Pe: DS 2 ; SPACE FOR PARAMETER 2 
roc DS 6 ; SPACE FOR PARAMETERS 3-5 


The argument transfer routine $AT is: 


ARGUMENT TRANSFER 


5 _ 
2 :BC POINTS TO 3RD PARAM. 
s :HL POINTS TO LOCAL STORAGE FOR PARAM 3 
4 A CONTAINS THE # OF PARAMS TO XFER oS 
(TOTAL-2) | 
5 
6 | 
T | ENTRY PAT 
g SAT: XCHG : SAVE HL IN DE 
9 | MOV H,B : 
10 MOV L,C  :HL = PTR TO PARAMS 
ll AT1l: MOV C,M 
12 INX H 
13 MOV B,M | 
14 INX H -BC = PARAM ADR 
15 XCHG -HL POINTS TO LOCAL. 
STORAGE 
16 MOV M,C 
17 INX H 
18 MOV M,B . 
19 INX H -STORE PARAM IN LOCAL © 
, AREA 
20 XCHG - SINCE GOING BACK TO 
ATI 
21 DCR A - TRANSFERRED ALL 
PARAMS? 
22 INZ AT] — :NO, COPY MORE 
23 RET -YES, RETURN 


When accessing parameters in a subroutine, remember that they are 
pointers to the actual arguments passed. 


Note The programmer must match the number, type, and length of the 
arguments in the calling program with the parameters expected 
by the subroutine. This applies to Microsoft-BASIC subroutines, 
as well as those written in assembly language. | 


4.4 INTERRUPTS 


Assembly language subroutines can be written to handle interrupts. All 
interrupt handling routines should save the stack, register AL, and the 
PSW (Program Status Word). Interrupts should always be re-enabled 
before returning from the subroutine because an interrupt automatically 
disables all further interrupts once it is received. Under CP/M implemen- 
tations of Microsoft-BASIC, all interrupt vectors are free. 
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2.14 DELETE 
2.15 DIM 


2.16 EDIT 
2.17 END 
2.18 ERASE 

2.19 ERR and ERL Variables 
2.20 ERROR 

2.21 FIELD 

2.22 FOR...NEXT 

2.23 GET 

2.24 GOSUB...RETURN 

2.25 GOTO 


2.26 IF... THEN[...ELSE] and IF.. GOTO 


2.27 INPUT 

2.28 INPUT# 

2.29 KILL 

2.30 LET 

2.31 LINE INPUT 

2.32 LINE INPUT# 

2.33 LIST 

2.34 LLIST 

2.35 LOAD 

2.36 LPRINT and LPRINT USING 
2.37 LSET and RSET 
2.38 MERGE 

2.39 MID$ 

2.40 NAME 

2.41 NEW 

2.42 NULL 

2.43 ON ERROR GOTO 
2.44 ON...GOSUB and ON...GOTO 
2.45 OPEN 

2.46 OPTION BASE 
2.47 OUT 

2.48 POKE 

2.49 PRINT 

2.50 PRINT USING 

2.51 PRINT# and PRINT# USING 
2.52 PUT 

2.53 RANDOMIZE 

2.54 READ 

2.55 REM 

2.56 RENUM 

2.57 RESTORE ° 

2.58 RESUME 


2.59 RUN 

2.60 SAVE 

2.61 STOP 

2.62 SWAP 

2.63 TRON/TROFF 
2.64 WAIT 

2.65 WHILE... WEND 
2.66 WIDTH 

2.67 WRITE 

2.68 WRITE# 


3 Microsoft BASIC Functions _ 


3.1 ABS 
3.2 ASC 
3.3 ATN 
3.4 CDBL 
3.5 CHR$ 
~3.6CINT 
S7CCss 
3.8 CSNG 
3.9 CVI, CVS, CVD 
3.10 EOF 
3.11 EXP 
3.12 FIX 
3.13 FRE 
3.14 HEX$ 
3.15 INKEY$ 


— 3.16 INP 


3.17 INPUT$ 
3.18 INSTR 
3.19 INT. 
3.20 LEFTS$ 
3.21 LEN 
3.22 LOC 
3.23 LOG 
3.24 LPOS 
3.25 MIDS 
3.26 MIK$, MKS$, MKD$ 
3.27 OCTS$ 
3.20. reek 
3.29 POS 
3.30 RIGHTS 


3.31 RND 

3.32 SGN 

3.33. SIN 

3.34 SPACES 

3.35 SPC | 

3.36 SQR , 
3.37 STR$ o 
3.38: STRINGS u 

3.39 TAB 

3.40 TAN 

3.41 USR 

3.42 VAL 
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B. Mathematical Functions. -_ 


\SCIl Character Codes 


D Microsoft BASIC Reserved Words 
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Introduction 


Microsoft(TM) BASIC is the most etensive be uciiion of BASIC 
available for microprocessors. Microsoft BASIC meets the ANSI quali- 
fications for BASIC, as set forth in document BSRX3.60-1978. Each 
release of Microsoft BASIC is apes with Berens versions. 


How to Use this Manual 


This manual is a reference for all im tations of Microsoft BASIC 
and for the Microsoft(TM) BASIC Compilers. 


The manual is divided into three chapters plus three appendices. Chap- 
ter 1 covers a variety of topics, largely pertaining to data representation in 
Microsoft BASIC. Chapter 2 describes the syntax and semantics of every 
command and statement in Microsoft BASIC, ordered alphabetically. 
Chapter 3 describes all Microsoft BASIC intrinsic functions, also ordered 
alphabetically. The appendices contain a list of error messages and 
codes, a list of mathematical functions, and a list of ASCII character 

codes. | 


Additional information about programming Microsoft BASIC is covered in 
the Microsoft BASIC User‘s Guide. The User's Guide describes the 
features of Microsoft BASIC that are implemented for your machine. It - 
also contains information relevant to your operating system and helpful 
hints about such matters as data I/O and assembly language subrou- 
tines. 


Syntax Notation 


Wherever the format for a statement or command is given, the following 
rules apply: 


CAPS Items in capital letters must be input as shown. 


. Items in lower case letters enclosed in angle brackets (< 
>) are to be supplied by the user. | 


[ ] Items in square brackets ([ ]) are optional. 


a 


Items followed by an 1 ellipsis (...) may be repeated any 


. Boos of times (up to the length of the line). 


Braces indicate that the user has a choice between two or — 
more entries. At least one of the entries enclosed in braces 
must be chosen unless the entries are also enclosed in 
square brackets. 


Vertical bars separate the choices within braces. At least 


one of the entries separated by bars must be chosen 
unless the entries are also enclosed in square brackets. 


All punctuation except angle brackets and square brackets 


(i.e., commas, parentheses, semicolons, hyphens, equal 


~ signs) must be included where shown. 


Sh ge a a a en Ag a A a i aN ch ie A ks 


LIST OF NEW COMMANDS ADDED TO MICROSOFT BASIC 


Added KEY$(x) function and KEYS(x)= statement, used to access and 
redefine the function keys. = 


KEYS(x) as a function, to access the current value of function key x. 


Format 


Example 


Format 


KEY$(x) 


where x is a numerical expression which evaluates to 
1,2,3,4,5,6,7, or 8. A value outside this range will cause a 
“Function Call Error.” This number indicates which func- 
tion key you wish to examine, as they are numbered on the 
function keys. It will return a string from 0 to 10 characters 
in length, which is what would be entered if the user hit the 
function key himself. 


You want to know (in your program) what function key 1 
will enter if it is typed. (We assume you have not modified 
the key yet.) 


100 X$=KEY$ (1) 


will set the variable X$ to contain the string “LIST” since 
that is what is displayed when the user hits function key 1. _ 
KEY$(x) can also be used like any other string variable or 

function in formulas: 


110 X$=''HI THERE! FUNCTION KEY 4 IS 
‘1 4KEY$(4)+'", OKAY?"! 
120 PRINT '' FUNCTION KEY 3 IS '' :KEY$(3) 


KEY$(x) as a statement, to change the value of a function 
key. 


KEY$(x)=string— expression 


where x is a numerical expression which evaluates to | 
1,2,3,4,5,6,7, or 8. A value outside this range will cause a 
“Function Call Error.” ‘string—expression’ is any string 
formula or constant. Length may be from 0 to 10 charac- 
ters; if it is longer than 10, the string will be truncated to 10 
characters before it is used. 


Example 


std g eatin tt cay eM btod, aah Stas Bel ete eas ae edie 


Function key x will be assigned the string—expression, 
and, until changed, function key x will enter when typed. 


When you press the MENU key, your changes will be 
shown. | 


To change function key 2 to enter RUN without typing a 
carriage return: 


100 KEY$(2)=''RUN'' 


To change function key 2 to enter RUN with a carriage 
return: | 


110 KEY$(2)=' 'RUN''+CHR$(13) 
To make a function key do nothing: 


120 KEY$(5)='' '! note: '' '' is the null 
string 


Here’s what happens if you try to put more than 10 charac- 
ters into a key: 


130 KEY$ (3) sp esdsereoos7esaae 10'' 


Now, if you PRINT KEY$(3), you will get only 0123456789. 
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CHAPTER 1 
GENERAL INFORMATION ABOUT MICROSOFT BASIC 
1.1 INITIALIZATION 


The procedure for initialization will vary with different implementations of 
Microsoft BASIC. Check the Microsoft BASIC User‘s Guide for the 
RoadRunner to determine how Microsoft BASIC is initialized with your 
operating system. 


1.2 MODES OF OPERATION 


When Microsoft BASIC is initialized, it displays the prompt “Ok”. “Ok” 
indicates Microsoft BASIC is at command level; that is, it is ready to 
accept commands. At this point, Microsoft BASIC may be used in either 
of two modes: direct mode or indirect mode. 


In direct mode, Microsoft BASIC statements and commands are not 
preceded by line numbers. They are executed as they are entered. 
Results of arithmetic and logical operations may be displayed immedi- 
ately and stored for later use, but the instructions themselves are lost 
after execution. Direct mode is useful for debugging and for using Micro- 
soft BASIC as a “calculator” for aes computations that do not require a 
complete program. 


Indirect mode is used for entering programs. Program lines are preceded 
by line numbers and are stored in memory. The program stored in 
memory is executed by entering the RUN command. 

1.3 LINE FORMAT 


Microsoft BASIC program lines have the following format (square brack- 
ets indicate optional input): 


nnnnn BASIC statement[:BASIC statement...] <carriage return> 


More than one BASIC statement may be placed on a line, but each must 
be separated from the last by a colon. 


A Microsoft BASIC program line always begins with a line number and 
ends with a carriage return. A line may contain a maximum of 255 
characters. 


It is possible to extend a logical line over more than one physical line by 
using the <line feed> key. <line feed> lets you continue typing a logical 
line on the next physical line without entering a <carriage return>. 


1.3.1 Line Numbers 


Every Microsoft BASIC program line begins with a line number. Line 
numbers indicate the order in which the program lines are stored in 
memory. Line numbers are also used as references in branching and 
editing. Line numbers must be in the range 0 to 65529. 


A period (.) may be used in EDIT, LIST, AUTO, and DELETE commands 
to refer to the current line. 


1.4 CHARACTER SET © 


The Microsoft BASIC character set consists of alphabetic characters, 
numeric characters, and special characters. 


The alphabetic characters in Microsoft BASIC are the upper case and 
lower case letters of the alphabet. 


The Microsoft BASIC numeric characters are the digits 0 through 9. 


In addition, the following special characters and terminal keys are recog- 
nized by Microsoft BASIC: 


Character Action 


Blank 

Equals sign or assignment symbol 
Plus sign | 

Minus sign 

Asterisk or multiplication symbol 
Slash or division symbol 

Up arrow or exponentiation symbol 
Left parenthesis — | 
Right parenthesis 

Percent _ 

Number (or pound) sign 

Dollar sign oe 
Exclamation point | 


—PAt*t S——- > ~ + + | 


[ Left bracket 
] —_ Right bracket 
Comma 
Period or decimal point | 
‘ Single quotation mark (apostrophe) Co 
Semicolon 
Colon | 
Ampersand 
~ Question mark 
Less than 
Greater than 
Backslash or integer division symbol 
At sign 
me _ Underscore 
<xC> ___ Deletes last character typed. 
<SAVE> Escapes edit mode subcommands. 
; See Section 2.16. 
<TAB> Moves print position to next tab stop. 
Tab stops are set every eight columns. 
<RETURN> Moves to next physical line. . 
<carriage Terminates input of a line. | 
return> © 


1.4.1 Control Characters 
Microsoft BASIC supports the following control characters: 


Control Character 


(CMD key on RoadRunner) Action 
Control-A Enters edit mode on the line being typed. 
Control-C Interrupts program execution and returns to 


BASIC command level. 


Control-G Rings the bell at the terminal. 
Control-H © Backspaces. Deletes the last character typed. - 
Control-| Tabs to the next tab stop. Tab SOPs are set 


every eight columns. 


Control-O Halts program output while execution contin- 
ues. A second Control-O resumes output. 


Control-R Lists the line that is currently being typed. 


Control-S © Suspends program execution. 

Control-Q Resumes program execution after a Control-S. 
Control-U | Deletes the line that is currently being typed. 
1.5 CONSTANTS | 


Constants are the values Microsoft BASIC uses during execution. There 
are two types of constants: string and numeric. 


A string constant is a sequence of up to 255 alphanumeric characters 
enclosed in double quotation marks. 


Examples: 


''HELLO'! 
“+ $25,000.00'' 
‘'Number of Employees'' 


Numeric constants are positive or negative numbers. Microsoft BASIC 
numeric constants cannot contain commas. There are five types of 
numeric constants: 


1. Integer constants Whole numbers between -32768 
and 32767. Integer constants do 
not contain decimal points. 


2. Fixed-point Positive or negative real numbers, 
constants i.e., numbers that con- 
tain decimal points. 


3. Floating-point | 


constants 


4. Hex constants 


5. Octal constants 


Positive or negative numbers rep- 
resented in exponential form (simi- 
lar to scientific notation). A floating- 
point constant consists of an 
optionally signed integer or fixed- 
point number (the mantissa) fol- 
lowed by the letter E and an op- 


tionally signed integer (the 


exponent). The allowable range for 
floating-point constants is 10-38 to 
10+38. 


| Examples: 


235 .988E-7 = .0000235988 
2359E6 = 2359000000 


(Double precision floating-point 
constants are denoted by the letter 
D instead of E. See Section 1.5.1.) 


Hexadecimal numbers, denoted by 
the prefix &H. 


Examples: 


&H76 
&HS2F 


| Octal numbers, denoted by the pre- 


fix &O or &. 
Examples: 


&0354'7 
(&1234 


1.5.1 Single And Double nrecrson Form For Numeric Constants 
Numeric constants may be either single precision or double precision 
numbers. Single precision numeric constants are stored with 7 digits of 
precision, and printed with up to 6 digits of precision. Double precision 
numeric constants are stored with 16 digits of precision and printed with 
up to 16 digits. | | 


A single precision constant is any numeric constant that has one of the 
following characteristics: — 


1. Seven or fewer digits. 

2. Exponential form using E. 

3. A trailing exclamation point (!). 
Examples: 

46.8 

—1.09E-—06 

5489 .0 

Re 5! 


A double precision constant is any numeric constant that has one of © 
these characteristics: 


1. Eight or more digits. 

2. Exponential form using D. 

3. A trailing number sign (#). 
Examples: 

545692811 

—1.09432D-—06 


5489 .0# 
7654321 .1234 


1.6 VARIABLES 


Variables are names used to represent values used ina BASIC program. 
The value of a variable may be assigned explicitly by the programmer, or 
it may be assigned as the result of calculations in the program. Before a 
variable is assigned a value, its value is assumed to be zero. 


1.6.1 Variable Names And Declaration Characters 


Microsoft BASIC variable names may be any length. Up to 40 characters 
are significant. Variable names can contain letters, numbers, and the 
decimal point. However, the first character must be a letter. Special type 
declaration characters are also allowed—see below. 


A variable name may not be a reserved word, but embedded reserved 
words are allowed. Reserved words include all Microsoft BASIC com- 
mands, statements, function names, and operator names. If a variable 
begins with FN, it is assumed to be a call to a user-defined function. 


Variables may represent either a numeric value or a string. String vari- 
able names are written with a dollar sign ($) as the last character. For 
example: A$ = “SALES REPORT”. The dollar sign is a variable type 
declaration character; that is, it “declares” that the variable will represent 
a string. : | | 
Numeric variable names may declare integer, single precision, or double 
precision values. The type declaration characters for these variable 
names are as follows: 

% Integer variable 

! Single precision variable 

# Double precision variable 
The default type for a numeric variable name is single precision. 


Examples of Microsoft BASIC variable names: 


PL# Declares a double precision value. 
MINIMUM! Declares a single precision value. - 
LIMIT% Declares an integer value. 

NG Declares a string value. 

ABC Represents a single precision value. — 


There is a second method by which variable types may be declared. 

The Microsoft BASIC statements DEFINT, DEFSTR, DEFSNG, and 
_ DEFDBL may be included in a program to declare the types for certain 
variable names. These statements are described in detail in Section 
2.12. 


1.6.2 Rea Variables © 


An array is a group or table of values referenced by the same variable 
name. Each element in an array is referenced by an array variable thatis — 
subscripted with an integer or an integer expression. An array variable | 
name has as many subscripts as there are dimensions in the array. For 
example V(10) would reference a value ina one-dimension array, T(1,4) 
would reference a value in a two-dimension array, and so on. The 
maximum number of dimensions for an array is 255. The maximum 
number of elements per dimension is 32,767. 


1.6.3 Space Requirements 


The following table lists only the number of bytes occupied by the values 
represented by the variable names. Additional requirements may vary 
according to implementation. 


Variables | Type Bytes 
Integer 2 
Single Precision 4 
Double Precision 8 

_ Arrays ~ Type Bytes 

Integer 2 per element 
Single Precision 4 per element 
Double Precision 8 per element 

Strings 


3 bytes overhead plus the present contents of the string. 


1.7 TYPE CONVERSION 


_ When necessary, Microsoft BASIC will convert a numeric constant from 
one type to another. The following rules and examples should be kept in 


mind. a | @ 
1. If a numeric constant of one type is set equal to a numeric 
variable of a different type, the number will be stored as the 
type declared in the variable name. (If a string variable is set 
equal to a numeric value or vice versa, a “Type mismatch” 
error occurs.) 


Example: 


10 AZ=23.42 
20 PRINT AZ 
RUN 

295 


2. During expression evaluation, all of the operands in an arith- 
metic or relational operation are converted to the same de- 
gree of precision, i.e., that of the most precise operand. Also, © 
the result of an arithmetic operation is returned to this degree 


of precision. 
Examples: 

10 D#=6#/7 The arithmetic was performed 
20 PRINT D# in double precision and the 
RUN result was returned in D# asa 


.8571428571428571 double precision value. 


10 D=6#/7 The arithmetic was performed 
20 PRINT D in double precision and the 
RUN result was returned to D 
—, 857143 (single precision variable), 


rounded, and printed as a 3 
single precision value. — 


3. Logical operators (see Section 1.8.3) convert their operands 
to integers and return an integer result. Operands must be in 
_ the range -32768 to 32767 or an “Overflow” error occurs. 


_ 4. When a floating-point value is converted to an integer, the | 
@ fractional portion is rounded. . 


| Example: 


10 CZ=55.88 
20 PRINT CZ 
RUN 

56 


0. If a double precision variable is assigned a single precision 
value, only the first seven digits (rounded) of the converted 
number will be valid. This is because only seven digits of 
accuracy were supplied with the single precision value. The 
absolute value of the difference between the printed double 
precision number and the original single precision value will 
be less than 6.3E-8 times the original single precision value. 


_ Example: 


10 A=2.04 
20 BH=A | 
50 PRINT A; B# 
RUN 
2.04 2.039999961853027 
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1.8 EXPRESSIONS AND OPERATORS 

An expression may be a string or numeric constant, a variable, or a 
combination of constants and variables with operators which produces a 
single value. 


Operators perform mathematical or logical operations on values. The 
Microsoft BASIC operators may be divided into four categories: 


1. Arithmetic 
2. Relational 
3. Logical 
4. Functional 
Each category is described in the following sections. 
1.8.1 Arithmetic Operators 


The arithmetic operators, in order of precedence, are: 


Operator Operation _ Sample Expression | 
‘) Exponentiation XT Y 
- Negation -X 
ay | Multiplication, Floating- X*Y 
point Division X/Y 
+,- Addition, Subtraction X+Y 


To change the order in which the operations are performed, use paren- 
theses. Operations within parentheses are performed first. Inside paren- 
theses, the usual order of operations is maintained. 
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ae: are some sample — expressions and their Microsoft BASIC 


coumerpans: 
Algebraic Expression 
X+2Y 


X- 


| X(-Y) 


BASIC — 
X+Y¥*2 

X-YIZ 

X*Y/Z 

(X+Y)/Z 

(Xt 2) TY 

XT (Y t Z) 

X*(-Y) Two consecutive 
operators must 


be separated by 
parentheses. 
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4.8.1.1 Integer Division And Modulus Arithmetic - 


Two additional operators are available in Microsoft BASIC: integer divi- 
sion and modulus arithmetic. | 


Integer division is denoted by the backslash (\). The operands are 
rounded to integers (must be in the range -32768 to 32767) before the 
division is performed, and the quotient is truncated to an integer. 
Example: 


10\4=2 25. 68\6.99=5 


Integer division follows multiplication and floating-point division in order 
of precedence. 


Modulus arithmetic is denoted by the operator MOD. Modulus arithmetic 
yields the integer value that is the remainder of an integer division. 


Example: 


10.4 MOD 4=2 (10/4=2 with a remainder 2) 
25.68 MOD 6.99=5 (26/7=35 with a remainder 5) 


Modulus arithmetic follows integer division in order of precedence. 


1.8.1.2 Overflow And Division By Zero- 


If, during the evaluation of an expression, division by zero is encoun- 
tered, the “Division by zero” error message i is displayed, machine infinity 
with the sign of the numerator is supplied as the result of the division, and 
execution continues. If the evaluation of an exponentiation operator 
results in zero being raised to a negative power, the “Division by zero” 
error message is displayed, positive machine infinity is supplied as the 
result of the exponentiation, and execution continues. 


If overflow occurs, the “Overflow” error message is displayed, machine 
infinity with the algebraically correct sign is supplied as the result, and 
— execution continues. 


15 


1.8.2 Relational Operators 


Relational operators are used to compare two values. The result of the 
comparison is either “true” (-1) or “false” (0). This result may then be 
used to make a decision regarding program flow. (See “IF” statements, 
Section 2.26.) | | 


The relational operators are: | 


Operator Relation Tested | ative 
=. Equality _, X=Y 
<> inequality | X<>Y 
— * Less than X<Y 
= Greater than X>Y 
<= Less than or equal to X<=Y 
>= Greater than or equal to X>=Y 


(The equal sign is also used to assign a value to a variable. See “LET,” 
Section 2.30.) : 


When arithmetic and relational operators are combined in one expres- 
sion, the arithmetic is always performed first. For example, the expres- 
sion 

X+Y<(T-1)/Z 
is true if the value of X plus Y is less than the value of T-1 divided by Z. 


More examples: 


IF SIN(X)<0O GOTO 1000 IF I MOD J<>0 THEN 
K=K+1 
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1.8.3 Logical Operators. 


Logical operators perform tests on flicks relations, bit manipulation, or 
Boolean operations. The logical operator returns a bitwise result which is 
either “true” (not zero) or “false” (zero). In an expression, logical opera- 
tions are performed after arithmetic and relational operations. The out- 
come of a logical operation is determined as shown in Table 1. The - 
operators are listed in order of precedence. 

Table 1. Microsoft nates Relational Operators Truth Table 


NOT | 
xX NOT X 
1 0 
0 - 
AND 
X YY XANDY 
, 3 4 
1 oO O 
0 1 0 
0 oO oO 
OR | 
= XxX YY XORY 
: 4 4 
1 @.- 4 
i + 4 
0 0 0 
XOR 
X Y  XXORY 
1 1 O 
1 Oo 1 
Oo 1 1 
0 0 0 
EQV | 
X Y  XEQVY 
a t. 4 
2 a 
0 1 0 
0 o 1 
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IMP 


X IMP 


X Y 
tate -gt # he 
1 0 O 
—0 1 1 
0 oO 1 


Just as the relational operators can be used to make decisions regarding 
program flow, logical operators can connect two or more relations and 
return a true or false value to be used in a decision (See “IF” statements, 
Section 2.26). 


Example: 


IF D<200 AND F<4 THEN 80 
IF I>10 OR K<0O THEN 50 
IF NOT P THEN 100 


Logical operators work by converting their operands to 16-bit, signed, 
two's complement integers in the range -32768 to 32767. (If the oper- 
ands are notin this range, an error results.) If both operands are supplied 
as O or -1, logical operators return 0 or -1. The given operation is 
performed on these integers in bitwise fashion, i.e., each bit of the result 
is determined by the corresponding bits in the two operands. 


Thus, it is possible to use logical operators to test bytes for a particular bit 
pattern. For instance, the AND operator may be used to “mask” all but 
one of the bits of a status byte at a machine I/O port. The OR operator 
may be used to “merge” two bytes to create a particular binary value. 
The following examples will help demonstrate how the logical operators 
work. 


63 AND 16=16 63=binary 111111 and 16=binary 10000, 
so 63 AND 16=16. 


15 AND 14=14 15=binary 1111 and 14=binary 1110, so 15 AND 
14=14 (binary 1110). 


-1 AND 8=8 -{=binary 1111111111111111 and 8=binary 1000, 
so -1 AND 8=8. 
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40OR 2=6 
10 OR 10=10 


0-1 OR -2=-1 | 


NOT X=-(X+1) 


4=binary 100 and 2=binary 10, so 4 OR 2=6 (binary 
110.) | | 


10=binary 1010, so 1010 OR 1010=1010 (decimal 
10). 7 


-1=binary 1111111111111111 and -2=binary 
1111111111111110, so -1 OR -2=-1. The bit com- 
plement of sixteen zeros is sixteen ones, which is the 
two’s complement representation of -1. | 


The two’s complement of any integer is the bit com- 
plement plus one. 


1.8.4 Functional Operators 


A function is used in an expression to call a predetermined operation that 
is to be performed on an operand. Microsoft BASIC has “intrinsic” 
functions that reside in the system, such as SQR (Square root) or SIN 
(sine). All Microsoft BASIC intrinsic functions are described in Chapter 3. 


Microsoft BASIC also allows “user-defined” functions that are written by 
the programmer. See “DEF FN,” Section 2.11. 


1.8.5 String Operations 


Strings may be concatenated by using +. 


Example: 


— 10 AS=!'FILE'' : BG=" NAME" 
20 PRINT A$+B$ | 
30 PRINT ''NEW ''+A$+BQ. 


RUN 


FILENAME 
NEW FILENAME 


19° 


Strings may be compared using the same relational operators that are 
used with numbers: 


= os <> 2s >= 


String comparisons are made by taking one character at a time from 
each string and comparing the ASCIl codes. If all the ASCII codes are the 
same, the strings are equal. If the ASCII codes differ, the lower code 
number precedes the higher. If during string comparison the end of one 
string is reached, the shorter string is said to be smaller. Leading and 
trailing blanks are significant. 


Examples: 


PiAATI<t tapi 

‘FILENAME! ' =! ‘FILENAME! ' 

AX tS yg 

ICL tts hep 

ke to! * Ke" 

SMYTH! '<!' SMYTHE"! 

Bo" S/12778"" where B$=''8/12/78'' 


Thus, string comparisons can be used to test string values or to alphabet- | 
ize strings. All string constants used in comparison expressions must be 


enclosed in quotation marks. 
1.9 INPUT EDITING 


If an incorrect character is entered as a line is being typed, it can be 
deleted with the <xC> key or with CMD-H. Rubout surrounds the deleted 
character(s) with backslashes. CMD-H has the effect of backspacing 
over a character and erasing it. Once a character(s) has been deleted, 
simply continue typing the line as desired. | 


To delete a line that is in the process of being typed, type CMD-U. A 
carriage return is executed automatically after the line is deleted. 


To correct program lines for a program that is currently in memory, simply 
retype the line using the same line number. Microsoft BASIC will auto- 
matically replace the old line with the new line. 


More sophisticated editing capabilities are piowced See “EDIT,” Sec- 
tion 2.16. 


20 


To delete the entire program: currently residing in memory, enter the 
NEW command. (See Section 2. 41 .) NEW is usually used to clear 
memory prior to ener a new program. 


1.10 ERROR MESSAGES 


If an error causes program execution to terminate, an error message is 
printed. For a complete list of Microsoft BASIC error codes and error 
messages, see Appendix A. 


a 2 Microsoft saa Commands and Statements 


introduction 
2.1 AUTO 
2.2 CALL 
2.3 CHAIN 
2.4 CLEAR 
2.5 DELETED | 
2.6 CLOSE | 
2.7 COMMON 
2.8 CONT 
2.9 DELETED 
2.10 DATA 
2.11 DEF FN 
2.12 DEFINT SNG/DBL/STR 
2.13 DEF USR 
2.14 DELETE 
2.15 DIM 
2.16 EDIT 
2.17 END 
2.18 ERASE 
2.19 ERR and ERL Variables 
2.20 ERROR 
2.21 FIELD 
2.22 FOR...NEXT 
2.23 GET 
2.24 GOSUB...RETURN 
2.25 GOTO 
2.26 IF... THEN[...ELSE] and IF...GOTO 
2.27 INPUT 
2.28 INPUT# 
2.29 KILL 
2.30 LET 
2.31 LINE INPUT 
2.32 LINE INPUT# 
2.33 LIST 
2.34 LLIST 
2.35 LOAD 
2.36 LPRINT and LPRINT USING 
2.37 LSET and RSET 
2.38 MERGE 
2.39 MID$ 
2.40 NAME. 
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2.41 NEW 
2.42 NULL 
2.43 ON ERROR GOTO 


2.44 ON...GOSUB and ON.. ‘GoTo 


2.45 OPEN 


2.46 OPTION BASE 


2.47 OUT 
2.48 POKE 

2.49 PRINT | 

2.50 PRINT USING 

2.51 PRINT# and PRINT# USING 
2.52 PUT - 
2.53 RANDOMIZE 

2.54 READ 

2.55 REM ~ 

2.56 RENUM 

2.57 RESTORE 

2.58 RESUME 


2.59 RUN 


2.60 SAVE 

2.61 STOP 

2.62 SWAP 

2.63 TRON/TROFF 
2.64 WAIT 

2.65 WHILE...WEND 
2.66 WIDTH 

2.67 WRITE 

2.68 WRITE# 
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CHAPTER 2 
MICROSOFT BASIC COMMANDS AND STATEMENTS. 


Microsoft BASIC commands and statements are described in this chap- CS 
ter. Each description is formatted as follows: 


Format Shows the correct format for the instruction. See the “In- 
troduction” to this manual for syntax notation. 


Purpose Tells what the instruction is used for. 
Remarks Describes in detail how the instruction is used. 


Example Shows sample programs or program segments that dem- 
onstrate the use of the instruction. 


Note Describes special cases or provides additional pertinent 
information. 
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2.1 AUTO 
Format 


Purpose 


Example 


ement>]] 


To generate a line number automatically after every car- 


riage return. 


AUT O begins | wmberir 
ments each subsequent line number by <increment>. 
The default for both values is 10. If <line number> is 
followed by a comma but <increment> is not specified, 
the last increment specified in an AUTO command is 
assumed. 


If AUTO generates a line number that is already being 
used, an asterisk is printed after the number to warn the 
user that any input will replace the existing line. However, 


typing a carriage return immediately after the asterisk will 


save the line and generate the next line number. 


AUTO is terminated by typing Control-C. The line in which 
Control-C is typed is not saved. After Control-C is typed, 
Microsoft BASIC returns to command level. 


~ AUTO 100,50 Generates line numbers 100, 


150, 200 .... 


AUTO Generates line numbers 10, 
20, 30, 40... 
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inc at <line number> and incre- 


2.2 CALL 
Format 
Purpose 


Remarks 


Example 


Note 
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CALL <variable name>[(<argument list>)] 


To call an assembly language subroutine. 


The CALL statement is one way to transfer program flowto — 


an external subroutine. (See also the USR function, Sec- 
tion 3.41) | 


_ <variable name> contains an address that is the starting 


point in memory of the subroutine. <variable name> may 
not be an array variable name. <argument list> contains 
the arguments that are passed to the external subroutine. 
<argument list> may contain only variables. 


The CALL statement generates the same calling se- 
quence used by Microsoft(TM) FORTRAN, Microsoft(TM) 
COBOL, and Microsoft(TM) BASIC Compilers. 


110 MYROUT=&HDOOO 
120 CALL MYROUT(I,J,K) 


In a Microsoft BASIC Compiler program, line 110 is not 
required because the address of MYROUT will be as- 
signed by the linking loader at load time. 


2.3 CHAIN 


Format 


Purpose 


Remarks 


Example 1 


CHAIN © [MERGE ienanest [<line number exp>] 
[,ALL][,DELETE <range>]] 


To calla program and pass variables to it from the current 
program. 


<filename> is the name of the — that is called. 


The COMMON statement may be used to pass variables 


(see Section 2.7). 
10 REM THIS PROGRAM DEMONSTRATES CHAINING 
USING COMMON TO PASS VARIABLES. 
20 REM SAVE THIS MODULE ON DISK AS ''PROGI1''! 
USING THE A OPTION. 30 DIM A$(2) ,B$(2) 
40 COMMON A$() ,B$() 
50 A$(1)=''VARIABLES IN COMMON MUST BE 
_ ASSIGNED'! | 
60 A$(2)=''VALUES BEFORE CHAINING. ''! 
70 B$(1)=! ee : BY(2) at 24 
80 CHAIN ' ‘PROG?! : | 
90 PRINT: PRINT B$(1): PRINT: PRINT B#(2): © 
PRINT | 
100 END 


<line number exp> is a line number or an expression that 
evaluates to a line number in the called program. It is the 
starting point for execution of the called program. If it is 
_ omitted, execution begins at the first line. 


Example 2 10 REM THE STATEMENT ' 'DIM A$(2),B$(2)'' MAY 
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ONLY BE EXECUTED ONCE. 

20 REMHENCE, IT DOES NOT APPEAR INTHIS © 
MODULE. ~— = 

30 REM SAVE THIS MODULE ON THE DISK AS 
''PROG2'' USING THE A OPTION. | 

40 COMMON A$(),B$() - 


50 PRINT: PRINT A$(1) ;A$(2) 


60 B$(1)=''NOTE HOW THE OPTION OF SPECIFYING 
A STARTING LINE NUMBER' ' 


70 BS(2)=''WHEN CHAINING AVOIDS THE 


DIMENSION STATEMENT IN 'PROG1'.'' 
80 CHAIN ''PROG1'' ,90 
90 END 


<line number exp> is not affected by a RENUM com- 
mand. 


With the ALL option, every variable in the current program 
is passed to the called program. If the ALL option is omit- 
ted, the current program must contain a COMMON state- 
ment to list the variables that are passed. See Section 2.7. 


The MERGE option allows a subroutine to be brought into 
the BASIC program as an overlay. That is, a MERGE 
operation is performed with the current program and the 
called program. The called program must be an ASCII file if 
it is to be MERGEd. 


After an overlay is brought in, it is usually desirable to 
delete it so that a new overlay may be brought in. To do 
this, use the DELETE option. 


Example 3. 10 REM THIS PROGRAM DEMONSTRATES CHAINING 


Note 


USING THE MERGE AND ALL OPTIONS. 
£0 REM SAVE THIS MODULE ON THE DISK AS 
‘*MAINPRG''. 
50 A$=''MAINPRG'' 


_ 40 CHAIN MERGE ''OVRLAY1'', 1010, ALL 


50 END 


1000 REM SAVE THIS MODULE ON THE DISK AS - 
‘'OVRLAY1'' USING THE A OPTION. 

1010 PRINT A$; '' HAS CHAINED TO OVRLAY1.'' 

1020 A$=''OVRLAY1'' 

1030 BE=''OVRLAY2'' 

1040 CHAIN MERGE ''OVRLAY2'', 1010, ALL, 
DELETE 1000-1050 

1050 END : 


1000 REM SAVE THIS MODULE ON THE DISK AS 
‘*OVRLAY2'' USING THE A OPTION. 

1010 PRINT A$; '' HAS CHAINED TO '';B$:''.'! 

1020 END 


The line numbers in <range> are affected bythe RENUM . | 
command. : 


The CHAIN statement with MERGE option leaves the files 
open and preserves the current OPTION BASE setting. 


lf the MERGE option is omitted, CHAIN does not preserve 
variable types or user-defined functions for use by the 
chained program. That is, any DEFINT, DEFSNG, 
DEFDBL, DEFSTR, or DEFFN statements containing 
shared variables must be restated in the chained program. 


When using the MERGE option, user-defined functions 
should be placed before any CHAIN MERGE statements 
in the program. Otherwise, the user-defined functions will 
be undefined after the merge is complete. 
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2.4 CLEAR 
Format 


Purpose 


Remarks 


Note 


CLEAR [,[<expression1 >][,<expression2>]] 


To set all numeric variables to zero, all string variables to 
null, and to close all open files; and, optionally, to set the 
end of memory and the amount of stack space. 


<expression1> is a memory location which, if specified, 
sets the highest location available for use by Microsoft 
BASIC. | | 


<expression2> sets aside stack space for Microsoft 


BASIC. The default is 512 bytes or one-eighth of the avail- — 


able memory, whichever is smaller. 


Microsoft BASIC allocates string space dynamically. An 


“Out of string space” error occurs only if there is no free 


memory left for Microsoft BASIC to use. 


2.5 CLOAD—Not used in Microsoft BASIC for the RoadRunner. 
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2.6 CLOSE 
Format CLOSE [l#]<file RUMORS T. (#1<fl number.. S| 
Purpose To conclude VO to ‘a cartridge file. | 


Remarks Sti number> is the number under which the file was 
7 _ OPENed. A CLOSE ‘with no arguments closes all open 
: files. are 


. The association boner sh peicaiak file and file number 
terminates upon execution of a CLOSE statement. The file 
may then be reQPENed using the same or a different file 

_ humber; likewise, that file number may now be reused to _ 
OPEN any file. | 


A CLOSE for a sequential output file writes the final buffer 
of output. 


The END statement and the NEW command always 
CLOSE all cartridge files automatically. (STOP does not 
close cartridge files.) | 


Example § See“Microsoft BASIC Cartridge I/O,” inthe Microsoft BASIC User's Guide. 
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2.7 COMMON 


Format 


Purpose 


~ Remarks 


Example — 


COMMON <list of variables> 
To pass varlables to a CHAINed program. | 
The COMMON statment is used in conjunction with the 


CHAIN statement. COMMON statements may appear any- 
where in a proram, though it is recommended that they 


appear at the beginning. The same variable cannot appear 


in more thanone COMMON statement. Array variables are 
specified by appending “()” to the variable name. If all 
variables are to be passed, use CHAIN with the ALL option 


and omit the COMMON statement. 


100 COMMON A,B,C,D(),G$110 CHAIN ! ee ” 
10 


The current nonexecutable statements are: 


COMMON 

DEFDBL, DEFINT, DEFSNG, DEFSTR. 
DIM 

OPTION BASE 

REM 

$ INCLUDE 


Array variables used in a COMMON statement must be 
declared in a preceding DIM statement. 


The standard form of the COMMON statement is referred 
to as blank COMMON. Microsoft FORTRAN Compiler- 
style named COMMON areas are also supported; howev- 
er, the variables are not preserved across CHAINs. The 
syntax for named COMMON is: 


COMMON /<name>/ <list of variables> 


where <name> consists of 1 to 6 alphanumeric charac- 
ters starting with a letter. This is useful for communicating 
with Microsoft FORTRAN Compiler and assembly lan- 
guage routines without having to explicitly pass parame- 
ters in the CALL amiaacasies 


The blank COMMON. size and order of variables must be 
_ the same in the CHAINing and CHAINed programs. With 
Microsoft BASIC Compiler, the best way to insure this is to 
place all blank COMMON declarations in a single include 
file and use the $INCLUDE statement in each program. 


For example: 
MENU .BAS 3 
- 10 $INCLUDE aeons 
: 1000 ¢ CHAIN ''PROG1'' 
~PROG1.BAS — 
10 $INCLUDE COMDEF 
. 2000 CHAIN ''MENU'' 
COMDEF.BAS 
‘100 DIM A(100) , B$( 200) 


110 COMMON I,J,K,A() 
120 COMMON AG, B$(),X,Y,Z 
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2.8 CONT 


Format 


Purpose 


Remarks 


Example 


CONT 


To continue program execution after a Control-C has been 
typed or a STOP or END statement has been executed. 


Execution resumes at the point where the break occurred. 
lf the break occurred after a prompt from an INPUT state- 
ment, execution continues with the reprinting of the prompt 
(“?” or prompt string). | 


CONT is usually used in conjunction with STOP for de- 
bugging. When execution is stopped, intermediate values 
may be examined and changed using direct mode state- 
ments. Execution may be resumed with CONT or a direct 
mode GOTO, which resumes execution at a specified line 
number. CONT may be used to continue execution after an 
error has occurred. 


CONT is invalid if the program has been edited during the 
break. 1 6 @ 7 


See “STOP,” Section 2.61. 


2.9 CSAVE—Not used in Microsoft BASIC for the RoadRunner. 


2.10 DATA 
Format 


Purpose 


DATA <list of constants> 


To store the numeric and string constants that are ac- 
cessed by the program’s READ statement(s). (See 
“READ,” Section 2.54.) 


“Remarks: DATA s 


mems are nonexecutable and may be placed 
anywhere in the program. A DATA statement may contain 
as many constants as will fit on a line (separated by com- 
mas). Any number of DATA statements may be used in a 
program. READ statements access DATA statements in 
order (by line number). The data contained therein may be 
thought of as one continuous list of items, regardless of 
how many items are on a line or where the lines are placed 
in the program. 


<list of constants> may contain numeric constants in any 
format; i.e., fixed-point, floating-point, or integer. (No nu- 
meric expressions are allowed in the list.) String constants 
in DATA statements must be surrounded by double quota- 
tion marks only if they contain commas, colons, or signifi- 
cant leading or trailing spaces. Otherwise, quotation marks 
are not needed. 


The variable type (numeric or string) given in the READ 
Statement must agree with the corresponding constant in 
the DATA statement. 


DATA statements may be reread from the beginning by | 
use of the RESTORE statement (Section 2.57). - 


Example See ''READ,'' Section 2.54. 


} 


2.11 DEF FN 


Format DEF FN<name>[(<parameter list>)]=<function defini- 
tion> 


Purpose To define and name a function that is written by the user. 


Remarks <name> must be a legal variable name. This name, pre- 
ceded by FN, becomes the name of the function. — 


<parameter list> consists of those variable names in the 


function definition that are to be replaced when the function 
is called. The items in the list are separated by commas. 
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Example 
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<function definition> is an expression that performs the 
operation of the function. It is limited to one line. Variable 
names that appear in this expression serve only to define 
the function; they do not affect program variables that have 
the same name. A variable name used in a function defini- 
tion may or may not appear in the parameter list. If it does, 

the value of the parameter is supplied when the function is 
called. Otherwise, the current value of the variable is used. 


The variables in the parameter list represent, on a one-to- 
one basis, the argument variables or values that will be 
given in the function call. 


This statement may define either numeric or string func- - 
tions. If a type is specified in the function name, the value of 
the expression is forced to that type before it is returned to 
the calling statement. If a type is specified in the function 
name and the argument type does not match, a “Type 
mismatch” error occurs. 


A DEF FN statement must be executed before the function 
it defines may be called. If a function is called before it has 
been defined, an “Undefined user function” error occurs. 
DEF FN is illegal in the direct mode. 


410 DEF FNAB(X,Y)=Xt3/Yt2 
420 T=FNAB(I,J) 


Line 410 defines the function FNAB. The function is called 
in line 420. 


2.12 DEFINT/SNG/DBL/STR 


Format | 


Purpose 


Remarks 


Examples 


DEF<type> <range(s) of letters> 
where <type> is INT, SNG, DBL, or STR 


To declare variable ned as integer, single precision, dou- 
ble precision, or string. 


Any variable naméebegineing with the letter(s) specified in 
<range of letters> will be considered the type of variable 
specified in the <type> portion of the statement. However, 
a type declaration character always takes precedence 
over a DEFtype statement. (See “Variable Names and 
Declaration Characters,” Section 1.6.1.) 


If no type declaration statements are encountered, Micro- 
soft BASIC assumes all variables without declaration 
characters are single precision variables. 


10 DEFDBL L-P All variables beginning with the 


letters L, M,N, O, and P willbe 
_ double precision variables. 


10 DEFSTR A All variables beginning with the 
letter A will be string variables. 


10 DEFINT I-N,W-Z All variables beginning with the 


letters I, J, K, L, M, N, W, X, Y, Z 
will be integer variables. 
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2.13 DEF USR 


Format 


Purpose 


Remarks 


Example 


DEF USR[<digit>]=<integer expression> 


To specify the starting address of an assembly language 
subroutine. 


<digit> may be any digit from 0 to 9. The digit corresponds 
to the number of the USR routine whose address is being 
specified. If <digit> is omitted, DEF USRO is assumed. 
The value of <integer expression> is the starting address 
of the USR routine. See “Assembly Language Subrou- 
tines,” in the Microsoft BASIC User's Guide. 


Any number of DEF USR statements may appear in a 
program to redefine subroutine starting addresses, thus 
allowing access to as many subroutines as necessary. 


200 DEF USRO=24000 
210 X=USRO(Y¥t2/2.89) 


2.14 DELETE 


Format 
Purpose 


Remarks 


Examples 


DELETE [<line number>][-<line number>] 

To delete program lines. 

Microsoft BASIC always returns to command level after a 
DELETE is executed. If <line number> does not exist, an 
“Illegal function call” error occurs. 


DELETE 40 Deletes line 40. 


DELETE 40-100 Deletes lines 40 through 100, inclu- 
sive. 


DELETE -40 Deletes all lines up to and including 
line 40. 


2.15 DIM 
Format 


Purpose 


‘Remarks 


Example 


DIM <list of subscripted variables> 


To specify the maximum values for array variable sub- 
scripts and allocate storage accordingly. 


If an array variable name is used without a DIM statement, 
the maximum value of the array‘s subscript(s) is assumed 
to be 10. If a subscript is used that is greater than the 
maximum specified, a “Subscript out of range” error oc- 
curs. The minimum value for a subscript is always 0, un- 
less otherwise specified with the OPTION BASE state- 
ment (see Section 2.46). 


The DIM statement sets all the elements of the specified 


_ arrays to an initial value of zero. : 


_ Theoretically, the maximum number of dimensions al- 


lowed in a DIM statement is 255. In reality, however, that 
number would be impossible, since the name and punc- 


tuation are also counted as spaces on the line, andthe line - 


itself has a limit of 255 characters. The number of dimen- 
sions is further limited by the amount of available memory. 


10 DIM A(20) 
20 FOR I=0 TO 20 
50 READ A(T) 


40 NEXT I 
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2.16 EDIT 


Format EDIT <line number> 

Purpose __To enter edit mode at the specified line. 

Remarks In edit mode, it is possible to edit portions of a line without 
retyping the entire line. Upon entering edit mode, BASIC 
types the line number of the line to be edited, then ittypes a 
space and waits for an edit mode subcommand. 
Edit Mode Subcommands 
Edit mode subcommands are used to move the cursor or to 
insert, delete, replace, or search for text within a line. The 
subcommands are not echoed. However, most of the edit 
mode subcommands may be preceded by an integer which 
causes the command to be executed that number of times. 
When an integer is not specified, it is assumed to be 1. 


Edit mode subcommands may be categorized according 
to the following functions: | 


1. Moving the Giron. 
2. Inserting text. 
3. Deleting text. 
4. Finding text. 
5. Replacing text. 
6. Ending and restarting edit mode. 
7. Entering edit mode from a syntax error. 
Note ‘Inthe descriptions that follow, <ch> represents any char- 
acter, <text> represents a string of characters of arbitrary 


length, [i] represents an optional integer (the default is de, 
and $ represents the Escape (or Altmode) key. 


Space bar Use the space bar to move the cursor to the right. [i]Space 


Rubout 
x! 


_ bar moves the cursor i spaces to the right. Characters are 


printed as you space over them. 


In edit mode, [i]Rubout moves the cursor i spaces to the left 


aces). Characters are printed as you backspace 


l<text>$ inserts <text> at the current cursor position. 
The inserted characters are printed on the terminal. To 
terminate insertion, press Escape. If a <carriage return> 
is typed during an Insert command, the effect is the same 
as pressing Escape (SAVE) and then <carriage return>. 
During an Insert command, the Rubout, Delete, or Under- 
score key on the terminal may be used to delete characters 
to the left of the cursor. xC will print out the characters as 
you backspace over them. Delete and Underscore will 


print an Underscore for each character that you backspace ~ | 
_ over. If an attempt is made to insert a character that will 


make the line longer than 255 characters, a bell (Control- 


_G) sounds and the character is not printed. 


The X subcommand extends the line. X moves the cursor 
to the end of the line, enters insert mode, and allows 
insertion of text as if an Insert command had been given. 


_ When you are finished extending the line, press Escape 


(SAVE) or carriage return. 


3. Deleting Text 


D 


[JD deletes i characters to the right of the cursor. The 
deleted characters are echoed between backslashes, and 


the cursor is positioned to the right of the last character 


deleted. If there are fewer than i characters to the right of 
the cursor, iD deletes the remainder of the line. 
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H deletes all characters to the right of the cursor and then 
automatically enters insert mode. H is useful for extending 
a line or replacing statements at the end of a line. — 


4. Finding Text 


S 


The subcommand [i]S<ch> searches for the ith occur- 
rence of <ch> and positions the cursor before it. The 
character at the current cursor position is not included in 
the search. If <ch> is not found, the cursor stops at the 
end of the line. All characters passed over during the 
search are printed. 


The subcommand [i]K<ch> is similar to [i]S<ch>, except 
all the characters passed over in the search are deleted. 
The cursor is positioned before <ch>, and the deleted 
characters are enclosed in backslashes. 


5. Replacing Text 


C 


The subcommand C<ch> changes the next character to 
<ch>. If you wish to change the next i characters, use the 
subcommand iC, followed by as many characters as are 
specified by i. After the ith new character is typed, change 
mode is exited and you will return to edit mode. 


6. Ending and Restarting Edit Mode 


<cr> 
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Typing a <carriage return> prints the remainder of the 
line, saves the changes you made, and exits edit mode. 


The E subcommand has the same effect as <carriage 
return>, except the remainder of the line is not printed. 


TheQ subcommand returns to Microsoft BASIC command 
level, without saving any of the changes that were made to 


the line in edit mode. 


L _The L subcommand lists the remainder of the line (saving 
any changes made so far) and repositions the cursor at the 
beginning of the line, still in edit mode. L is usually used to 
list the line when you first enter edit mode. 


A The A subcommand lets you begin editing a line over 
again. It restores. the original line and repositions the cur- 
sor at the beginning. 

Control-A | 


(CMD-A) —_ Toenter edit mode on the line you are currently typing, type 
- 3 CMD-A. Microsoft BASIC responds with a <carriage re- 
turn>, an exclamation point (!), and a space. The cursor 
will be positioned at the first character in the line. Proceed 

by typing an edit mode subcommand. 


Remember, if you have just entered a line and wish to go 
back and edit it, the command “EDIT.” will enter edit mode 
at the current line. (The line number symbol “.” always 
refers to the current line.) 


to Microsoft BASIC while in edit mode, BASIC sends a __ 
Control-G (bell) to the terminal, and the command or char- - 
acter is ignored. a | 


7. Entering Edit Mode from a Syntax Error 


@ If an unrecognizable command or illegal character is input 


When a syntax error is encountered during execution of a 
program, Microsoft BASIC automatically enters edit mode 
at the line that caused the error. For example: 


10 K=2(4) 

RUN 

?Syntax error in 10 
10 


When you finish editing the line and press <carriage re- 
turn> (or the E subcommana), Microsoft BASIC reinserts 

& the line. This causes all variable values to be lost. To 
preserve the variable values for examination, first exit edit 
mode with the Q subcommand. Microsoft BASIC will return 
to command level, and all variable values will be pre- 
served. 
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2.17 END 
Format END 


Purpose To terminate program execution, close all files, and return © 
to command level. 


Remarks END statements may be placed anywhere in the program 
to terminate execution. Unlike the STOP statement, END 
does not cause a “Break in line nnnnn” message to be 
printed. An END statement at the end of a program is 
optional. Microsoft BASIC always returns to command 
level after an END is executed. 


Example 520 IF K>1000 THEN END ELSE GOTO 20 


2.18 ERASE 
Format ERASE <list of array variables> 
Purpose To eliminate arrays from a program. - 


Remarks Arrays may be redimensioned after they are ERASEd, or 
the previously allocated array space in memory may be 
used for other purposes. If an attempt is made to redimen- 
sion an array without first lila it,a “Redimensioned 
array” error occurs. | 


Example 


450 ERASE A,B 
460 DIM B(99) 


2.19 ERR AND ERL VARIABLES: 


When an error handling routine is entered, the variable 
hi contains the error code for the error and the variable 

contains the line number of the line in which the error 
was detected. The ERR and ERL variables are usually 
used in IF... THEN statements to direct program flow in the 
error handling routine. 


lf the statement that caused the error was a direct mode 
Statement, ERL will contain 65535. To test whether an 
error occurred in a direct statement, use IF 65535=ERL 
THEN .... Otherwise, use 


IF ERR=error code THEN ... 
IF ERL=line number THEN ... 


If the line number is not on the right side of the relational 
| operator, it cannot be renumbered with RENUM. Because 
& | | _ ERL and ERR are reserved variables, neither may appear ** 
to the left of the equal sign in a LET (assignment) state- 
ment. Microsoft BASIC error codes are listed in Appendix 
A. 


Format ERROR <integer expression> 


Purpose To simulate the occurrence of a BASIC error, or to allow 
7 error codes to be defined by the user. 


Remarks —_ The value of <integer expression> must be greater than 0 
and less than 255. If the value of <integer expression> 
equals an error code already in use by BASIC (see Appen- 

- dix A), the ERROR statement will simulate the occurrence 
@e of that error and the corresponding error message will be 
printed. (See Example 1.) 


Example 1 


Example 2 
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To define your own error code, use a value that is greater 
than any used by Microsoft BASIC error codes. (It is pref- 
erable to use the highest available values, so compatibility 
may be maintained when more error codes are added to 
Microsoft BASIC.) This user-defined error code may then 
be conveniently handled in an error handling routine. (See 
Example 2.) | | 


if an ERROR statement specifies a code for which no error 
message has been defined, Microsoft BASIC responds 
with the “Unprintable error” error message. Execution of 
an ERROR statement for which there is no error handling 
routine causes an error message to be printed and execu- — 
tion to halt. | 3 


List 

10 S=10 

20 T=9 

30 ERROR S+T 

40 END | 

Ok 

RUN 
String too long in line 30 


Or, in direct mode: 


Ok 

ERROR 15 (You type this line.) 
String too long (BASIC types this line.) 
Ok 


110 ON ERROR GOTO 400 120 INPUT ' ‘WHAT IS YOUR 
BET'';B 130 IF B>5000 THEN ERROR 210 


400 IF ERR=210 THEN PRINT ' ‘HOUSE LIMIT IS 
$5000'' a 
410 IF ERL=130 THEN RESUME 120- 


FIELD [#}<file number>, <field width> AS <string vari- 
able>... 


To aibewe: ee for aciebies in a random file buffer. 
Before a GET statement or PUT statement can be execut- 


ed, a FIELD statement must be executed to format the 


_<file number> is the number under which the file was 


OPENed. <field width> is the number of characters to be 
allocated to <string variable>. For example, 


FIELD 1,20 AS N$,10 AS ID$, 40 AS ADD$ 


allocates the first 20 positions (bytes) in the random file 
buffer to the string variable N$, the next 10 positions to ID$, 
and the next 40 positions to ADD$. FIELD does NOT place 
any data in the random file buffer. (See “LSET/RSET,” 


- Section 2.37, and “GET,” Section 2.23.) 


The total number of bytes allocated in a FIELD statement — 
must not exceed the record length that was specified when 
the file was OPENed. Otherwise, a “Field overflow” error 
occurs. (The default record length is 128 bytes.) 


Any number of FIELD statements may be executed for the 
same file. All FIELD statements that have been executed 
will remain in effect at the same time. 


Do not use a FIELDed variable name in an INPUT or LET 
statement. Once a variable name is FIELDed, it points to 
the correct place in the random file buffer. If a subsequent 
INPUT or LET statement with that variable name is exe- 
cuted, the variable‘s pointer is moved to string space. 


Example 1 FIELD 1,20 AS N$,10 AS ID$,40 AS ADDS 


Allocates the first 20 positions (bytes) in the random file 

buffer to the string variable N$, the next 10 positions to ID$, 

and the next 40 positions to ADD$. FIELD doesNOT place. @) 
any data in the random file buffer. (See also “GET,” Sec- 

tion 2.23, and “LSET/RSET,” Section 2.37.) 


Example 2 10 OPEN ''R,''#1,''A:PHONELST'' ,35 
15 FIELD #1,2 AS RECNBR$,33 AS DUMMY$ 
20 FIELD #1,25 AS NAMES,10 AS PHONENBRS 
20 GET #1 
30 TOTAL=CVI(RECNBR) $ 
35 FOR I=2 TO TOTAL 
40 GET #1, I 
45 PRINT NAMES, PHONENBRG 
50 NEXT I 


Illustrates a multiple defined FIELD statement. In state- 

ment 15, the 35 byte field is defined for the first record to 

keep track of the number of records in the file. In the next | 
loop of statements (35-50), statement 20 defines the field i 
for individual names and phone numbers. 


Example 3 10 FOR LOOPZ=0 TO 7 
20 FIELD #1, (LOOPZ*16) AS OFFSETS, 16 AS 
A$ (LOOPZ ) 
30 NEXT LOOPZ 


Shows the construction of a FIELD statement using an 
array of elements of equal size. The result is equivalent to 
the single declaration: 


FIELD #1,16 AS A$(0),16 AS A$(1),...,16 AS AG 
(6),16 AS A$(7) 
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Example 4 10DIMSIZEZ (NUMBZ) : REM ARRAY OF FIELD So 
20 FOR LOOP%=0 TO NUMBZ: READ nae ae: 
(LOOPZ) : NEXT LOOPZ 
50 DATA 9,10,12,21,41 


120 DIM A$(NUMBZ) : REM ARRAY OF FIELDED 
_ VARIABLES 
130 OFFSETZ=0 
140 FOR LOOPZ=0 TO NUMBZ ~ 
150 FIELD #1, OFFSETZASOFFSET$ , SIZEZ ( ae ie 
A$ ( LOOPZ) | 
160 OFFSETZ= OF FSET%+SIZEZ% (LOOPS) 
170 NEXT LOOPZ : 


Creates a field in the same manner as Example 3. Howev- 
er, the element size varies with each element. The equiva- 
_ lent declaration is: 


FIELD #41,SIZEZ(0) AS A$(0), SIZEZ(1) AS AG 
(1),...SIZEZ%Z(NUMBZ) AS A$ ( NUMBZ) 


2.22 FOR...NEXT 


Format 


Purpose ~ 


Remarks 


FOR <variable>=x TO y [STEP z] | 


NEXT [<variable>][,<variable>...] 
where x, y, and z are numeric expressions. 


To allow a series of instructions to be performed inaloopa 
given number of times. 


<variable> | is used asa a counter. The first numeric expres- 
sion (x) is the initial value of the counter. The second 
numeric expression (y) is the final value of the counter. The 
program lines following the FOR statement are executed 


_until the NEXT statement is encountered. Then the counter — 
- is adjusted by the amount specified by STEP. A check is 


performed to see if the value of the counter is now greater 
than the final value (y). If it is not greater, Microsoft BASIC 
branches back to the statement after the FOR statement 
and the process is repeated. If it is greater, execution 
continues with the statement following the NEXT state- 
ment. This is a FOR... NEXT loop. 


If STEP is not specified, the increment is assumed to be 
one. If STEP is negative, the final value of the counter is set 
to be less than the initial value. The counter is decreased 
each time through the loop. The loop is executed until the 
counter is less than the final value. 


The counter must be an integer or single precision numeric 
constant. If a double precision numeric constant is used, a 
“Type mismatch” error will result. 


The body of the loop is skipped if the initial value of the loop 


times the sign of the STEP exceeds the final value times 
the sign of the STEP. 
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Example 1 


Example 2 


Nested Loops 


FOR...NEXT loops may be nested; that is, a FOR...NEXT 
loop may be placed within the context of another FOR... 
NEXT loop. When loops are nested, each loop must have a 
unique variable name as its counter. The NEXT statement 
for the inside loop must appear before that for the outside 
loop. If nested loops have the same end point, a single 
NEXT statement may be used for all of them. 


The variable(s) in the NEXT statement may be omitted, in 
which case the NEXT statement will match the most recent 


_ FOR Reapiaauc If a NEXT statement is encountered be- 


g FOR statement, a “NEXT without 
e is issued and execution is termi- 


FOR” error 
nated. 


10 K=10 

20 FOR I=1 TOK STEP 2 
50 PRINT I; 

40 K=K+10 


_ 50 PRINT K 


60 NEXT 


10 J=0 
20 FORI=1TOJ 
30 PRINT I 


40 NEXT I 


In this example, the loop does not execute because the 
initial value of the loop exceeds the final value. 


Example 3. 10 I=5 
20 FOR I=1 TO I+5 
30 PRINT I; — 
40 NEXT 
RUN | 
12345 6 T 8 910 
Ok 


In this example, the loop executes ten times. The final 
value for the loop variable | is always set before the initial 
value is set. 


_ Note Previous versions of Microsoft BASIC set the initial value 
of the loop variable before setting the final value; i.e., the 
above loop would have executed six times. 
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2.23 GET 
Format 


Purpose 


Remarks 


Example 


Note 


GET [#]<file number>[,<record number>] 


To read a record from a random cartridge file into a random 
buffer. 


<file number> is the number under which the file was 
OPENed. If <record number> is omitted, the next record 
(after the last GET) is read into the buffer. The aver 
possible record number is 32767. 


See “Microsoft BASIC Cartridge File perenne in the 


| Microsoft BASIC User' S Guide. 


After a GET statement has been executed, INPUT# and 
LINE INPUT# may be executed to read characters from 


_ the random file buffer. — 
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2.24 GOSUB...RETURN 


Format 


Purpose 


Remarks 


Example 


GOSUB <line number> 


RETURN 
To branch to and return from a subroutine. 


<line number> is the first line of the subroutine. 


A subroutine may be called any number of times in a 


program. A subroutine also may be called from within 
another subroutine. Such nesting of subroutines is limited 


only by available memory. 


The RETURN statement(s) in a subroutine cause Micro- 
soft BASIC to branch back to the statement following the 
most recent GOSUB statement. A subroutine may contain 
more than one RETURN statement, should logic dictate a 
return at different points in the subroutine. Subroutines 
may appear anywhere in the program, but it is recom- 

mended that the subroutine be readily distinguishable from 
the main program. To prevent inadvertent entry into the 
subroutine, precede it with a STOP, END, or GOTO state- 


ment that directs program control around the subroutine. 


10 GOSUB 40 

20 PRINT ' ‘BACK FROM SUBROUTINE! ' 
50 END 

40 PRINT ''SUBROUTINE''; 

DO PRINT ** IN'*; 

60 PRINT '' PROGRESS'' 


70 RETURN 


RUN 


_ SUBROUTINE IN PROGRESS 


BACK FROM SUBROUTINE 
Ok 


Format 


Purpose 


Remarks 


Example 


50 GOTO 10 

60 DATA5,7,12 

Ok 

RUN 

R= 5 AREA = 78.5 
R= 7 AREA = 153.86 
R = le AREA = 452.16 


GOTO <line number> 


To branch unconditionally out of the normal program se- 
SNES a apenas ae RUNDE. 


If <line ainbes is an executable statement, that state- 
ment and those following are executed. If it is a nonexe- 
cutable statement, execution proceeds at the first execut- 
able Statement encountered after <line number>. 


LIST 
10 READ R 

20 PRINT ''R ='':R, 
30 A=3.14*RT2 | 
40 PRINT ' ‘AREA =''-A 


?Out of data in 10 
Ok 


2.26 IF...THENT...ELSE] AND IF...GOTO 


Format IF <expression> THEN {<statement(s)>|<line number>} — 


[ELSE {statement(s)>|<line number>}]_ 


Format 


Purpose 


| Remarks | 
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IF SeNpieeeelc GOTO <line. number> 


[ELSE {<statement(s)>|<line number>} 


~ To make a decision regarding program flow based o on the 


result returned by an expression. 


If the result of <expression> is not zero, the THEN or 
GOTO clause is executed. THEN may be followed by 
either a line number for branching or one or more state- 
ments to be executed. GOTO is always followed by a line 
number. If the result of <expression> is zero, the THEN or 
GOTO clause is ignored and the ELSE clause, if present, is 
executed. Execution continues with the next executable 
statement. A comma is allowed before THEN. 


Nesting of IF Statements | 


IF...THEN...ELSE statements may be nested. Nesting is 
limited only by the length of the line. For example, 


IF X>Y THEN PRINT ''GREATER'' ELSE IF Y>X 
THEN PRINT ''LESS THAN'' ELSE PRINT 
'' EQUAL! 


is a legal statement. If the statement does not contain the 
same number of ELSE and THEN clauses, each ELSE is 
matched with the closest unmatched THEN. For example 


IF A=B THEN IF B=C THEN PRINT ''A=C'' 
ELSE PRINT ''A<>C!''! 


will not print “A<>C” when A<>B. 


oo, 


Note 


Example 1 


Example 2 


Example 3 


If an IF... THEN statement is followed by a line number in 
direct mode, an “Undefined line” error results, unless a 
statement with the specified line number had previously 
been entered in indirect mode. 


When using IF to test equality for a value that is the result of 
a floating-point computation, remember that the internal 
representation of the value may not be exact. Therefore, 
the test should be against the range over which the accu- 
racy of the value may vary. For example, to test a com- 
puted variable A against the value 1.0, use: 


IF ABS (A-1.0)<1.0E-6 THEN ... 


This test returns true if the value of A is 1.0 with a relative 
error of less than. 1.0E-6. 


200 IF I THEN GET#1,1 
This statement GETs record number | if | is not zero. 


100 IF(I<20)*(I>10) THEN DB=1979-1: GOTO 300 
110 PRINT ''OUT OF RANGE''! 


In this example, a test determines if | is greater than 10 and 
less than 20. If | is in this range, DB is calculated and 
execution branches to line 300. If | is not in this range, 
execution continues with line 110. 


210 IF IOFLAG THEN PRINT A$ ELSE LPRINT A$ 
This statement causes printed output to go either to the 
terminal or the line printer, depending on the value of the 


variable IOFLAG. If |OFLAG is zero, output goes to the line 
printer; otherwise, output goes to the terminal. 
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2.27 INPUT 
Format. 
Purpose 


Remarks | 


INPUT[:] [<“prompt string’ >;]<list of variables> 
To allow input from the terminal during program execution. 


When an INPUT statement is encountered, program exe- 


_ cution pauses and a question mark is printed to indicate 


the program is waiting for data. If <“prompt string’> is 
included, the string is printed before the question mark. 
The required data is then entered at the terminal. 


A comma may be used instead of a semicolon after the 


prompt string to suppress the question mark. For example, © 


the statement INPUT “ENTER BIRTHDATE” ,B$ will print 
the prompt with no question mark. 


If INPUT is immediately followed by a semicolon, then the 
Carriage return typed by the user to input data does not 
echo a carriage return/line feed sequence. 


The data that is entered is assigned to the variable(s) given. . 


in <variable list>. The number of data items supplied must 
be the same as the number of variables in the list. Data 
items are separated by commas. 


The variable names in the list may be numeric or string 


_ variable names (including subscripted variables). The type 


of each data item that is input must agree with the type 
specified by the variable name. (Strings input to an INPUT 
statement need not be surrounded by quotation marks.) 


Responding to INPUT with too many or too few items or | 


with the wrong type of value (numeric instead of string, 
etc.) causes the messsage “?Redo from start” to be print- 


ed. No assignment of input values is made until an accept- 


_ able response is given. 


Examples _ 


~ ete. 


10 INPUT X © 

20 PRINT X ! Sree IS'' Xft2 
50 END 

RUN 


25 (The 5 was typed in by the user 


__ in response to the question mark.) 
SO SQUARED IS 25 _ 
Ok 


ior 

10 PI=3.14 

20 INPUT '‘WHAT IS THE RADIUS'* =R 

30 A=PI*Rt2 

40 PRINT ''THE AREA OF THE CIRCLE ITS? "3A 
50 PRINT 

60 GOTO 20 

Ok | 

RUN a 

WHAT IS THE RADIUS? 7.4 (User types 7.4) 
THE AREA OF THE CIRCLE IS 171.946 


WHAT IS THE RADIUS? 


2.28 INPUT# 


Format 


Purpose 


Remarks 


Example 


INPUT#<file number>,<variable list> 


To read data items from a sequential cartridge file and 
assign them to program variables. 


<file number> is the number used when the filé “was 
OPENed for input. <variable list> contains the variable 
names that will be assigned to the items in the file. (The 
variable type must match the type specified by the variable 
name.) With INPUT#, no question mark is printed, as with 
INPUT. — : : 2 Pe 


The data items in the file should appear just as they would if 
data were being typed in response to an INPUT statement. 
With numeric values, leading spaces, carriage returns, 
and line feeds are ignored. The first character encountered 
that is not a space, carriage return, or line feed is assumed 
to be the start of a number. The number terminates on a 
space, Carriage return, line feed, or comma. 


If Microsoft BASIC is scanning the sequential data file for 
a string item, leading spaces, carriage returns, and line 
feeds are also ignored. The first character encountered 
that is not a space, carriage return, or line feed is assumed 
to be the start of a string item. If this first character is a 
quotation mark (‘), the string item will consist of all charac- 
ters read between the first quotation mark and the second. 
Thus, a quoted string may not contain a quotation mark as 
a character. If the first character of the string is not a 
quotation mark, the string is an unquoted string, and will 
terminate on a comma, carriage return, or line feed (or after 
255 characters have been read). If end-of-file is reached 
when a numeric or string item is being INPUT, the item is 
terminated. 


See “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC User’s Guide. 


2.29 KILL 
Format 
Purpose 


Remarks 


Example 


2.30 LET 


Format 


Purpose» 


Remarks — 


Example 


KILL <filename> _ 


To delete a file from cartridge. 


If a KILL statements given for a file that is currently OPEN, 
a “File already open” error occurs. 


KILL is used for all types of cartridge files: program files, 
random data files, and sequential data files. 


200 KILL ''DATAL.DAT!' 


See also “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC User’s Guide. | 


[LET ]<variable>=<expression> 
To assign the value of an expression to a variable. 


Notice the word LET is optional; i.e., the equal sign is 
sufficient for assigning an expression to a variable name. 


110 LET D=12 

120 LETE=12 72 
130 LET F=12 44 
140 LET SUM=D+E+F 


or 


110 D=12 
120 E=12 f2 
130 F=1274 
140 SUM=D+E+F 


2.31 LINE INPUT 


Format LINE INPUT{[;] [<“prompt string”>;]<string variable> 


Purpose 


Remarks 


Example 
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To input an entire line (up to 254 characters) to a string 
variable, without the use of delimiters. 


<“prompt string’> is a string literal that is printed at the 
terminal before input is accepted. A question mark is not 


printed unless it is part of <“prompt string”>. All input from 


the end of <“prompt string’> to the carriage return is 
assigned to <string variable>. However, if a line feed/ 


Carriage return sequence (this order only) is encountered, . 


both characters are echoed; but the carriage return is 
ignored, the line feed is put into <string variable>, and 
data input continues. 


lf LINE INPUT is immediately followed by a semicolon, 
then the carriage return typed by the user to end the input 
line does not echo a carriage return/line feed sequence at 
the terminal. 


ALINE INPUT statement may be aborted by typing Control- 
C. Microsoft BASIC will return to command level and type 
“Ok”. Typing CONT resumes execution at the LINE 
INPUT. 


See “LINE INPUT#,” Section 2.32. 


OPE 


"LINE INPUT# is especia 


LINE INPUT#<file number>,<string variable> 


To read an entire line (up to 254 characters), without 
rs aaa alae 
variable. 


<file baal is the number under which the file was 

ed. <string variable> is the variable name to which 
the line will be assigned. LINE INPUT# reads all charac- 
ters in the sequential file up to a carriage return. It then 
skips over the carriage return/line feed sequence. The next 
LINE INPUT# reads all characters up to the next carriage 
return. (Ifa eee ee return sequence is encoun- 


tered, it is preserved.) 


pecially useful if each line of a data file 
has been broken into fields, or if a Microsoft BASIC pro- 
gram saved in ASCII format is being read as data by 
another program. (See “SAVE,” Section 2.60.) 


10' OPEN 6'O*%. 1.*4*LiIst : 
20 LINE INPUT ''CUSTOMER INFORMATION? '';:C$ 
30 PRINT #1, C$ 

40 CLOSE 1 | 

50 OPEN ‘‘I*',1,''LIST''! 
60 LINE INPUT #1, CH © 
70 PRINT C$ 

80 CLOSE 1 

RUN 


CUSTOMER INFORMATION? LINDA JONES 234, 4 
MEMPHIS LINDA JONES 234,4 MEMPHIS 


Ok 


2.33 LIST 


Format 1 LIST[ <line number>] 


Format 2 LIST [<line number>][-[<line number>]] 


Purpose 


Remarks 


64 


To list all or part of the program currently in memory at the 


terminal. 


Microsoft BASIC diay returns to command ae after a 
LIST is executed. 


Format 1 


If <line number> is omitted, the program is listed begin- 
ning at the lowest line number. (Listing is terminated either 
when the end of the program is reached or by typing 
CMD-C.) If <line number> is included, only the specified 
line wil be listed. 


Format 2 
This format allows the following options: 


1. If only the first <line number> is specified, that line and 
all higher-numbered lines are listed. 


2. If only the second <line number> (i.e., [-[<line num- 
ber>]}) is specified, all lines from the beginning of the 
program through that line are listed. 


3. If both <line Repel ele are specified, me entire range 
is listed. 


2.34 LLIST 
| Format 


Purpose 


Note 


Example 


Format 1 


Lists the program currently in memory. 


LIST500  —_Lists line 500. 

Format 2 | 

LIST 150- Lists all lines from 150 to the end. 

LIST-1000 —_Lists all lines from the lowest number 
: through 1000. 


LIST 150-1000 _Lists lines 150 through 1000, inclusive. 


LLIST [<line number>f -[<line number>]]} 


To list all or part of the ero currently in memory at the 
line pont: 


| LLIST assumes a 192-character-wide printer. 


Microsoft BASIC always returns to command level after an 
LLIST is executed. The options for LLIST are the same as 
for LIST, Format 2. 


LLIST and LPRINT are not included in all implementations 
of Microsoft BASIC. 


See the examples for “LIST,” Format 2. 


2.35 LOAD 
Format 
Purpose 


Remarks 


Example 
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LOAD <filename>[,R] 


To load a file from cartridge into memory. 


<filename> is the name that was used when the file was 
SAVEd. (Your operating system may append a default 
filename extension if one was not supplied in the SAVE 
command. Refer to “Microsoft BASIC Cartridge File Han- 
dling,” in the Microsoft BASIC User's Guide, for informa- 
tion about possible filename extensions in your operating 
system.) | | 


The R option automatically runs the program after it has 
been loaded. 


LOAD closes all open files and deletes all variables and 
program lines currently residing in memory before it loads 
the designated program. However, if the R option is used 
with LOAD, the program is RUN after it is LOADed, and all 
open data files are kept open. Thus, LOAD with the R 
option may be used to chain several programs (or seg- 
ments of the same program). Information may be passed 
between the programs using their cartridge data files. 


LOAD ''STRTRK'',R 


LOAD ''B:MYPROG'! 


2.36 LPRINT AND LPRINT USING 
Format —_LPRINT [<list of sipreaiones 

LPRINT USING <string exp>;<list of expressions> 
Purpose To print data at the line printer. 


Remarks Sameas PRINT and PRINT USING, except output goes to 
the line printer. See Section 2.49 and Section 2.50. 


LPRINT assumes a 132-character-wide printer. 


Note — LPRINT and LLIST are not included in all implementations 
of Microsoft BASIC. 
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2.37 LSET AND RSET 


Format 


Purpose > 


Remarks 


Note 


68 


LSET <string variable>=<string expression> 


‘RSET <string variable>=<string expression> 


To move data from memory to a random file buffer (in 
preparation for a PUT statement). 


lf <string expression> requires fewer bytes than were 
FIELDed to <string variable>, LSET left-justifies the string 
in the field, and RSET right-justifies the string. (Spaces are 
used to pad the extra positions.) If the string is too long for 
the field, characters are dropped from the right. Numeric 
values must be converted to strings before they are LSET 
or RSET. See “MKI$, MKS$, MKD$,” Section 3.26. 


Examples 150 LSET A$=MKS$(AMT) 
160 LSET D$=DESC($) 


See also “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC User's Guide. 


LSET or RSET may also be used with a nonfielded string 
variable to left-justify or right-justify a string ina given field. 
For example, the program lines 


110 A$=SPACE$ (20) 
120 RSET A$=N$ 


right-justify the string N$ in a 20-character field. This can 
be very handy for formatting printed output. 


2.38 MERGE 


Format 


MERGE <filename> 


To merge a specified cartridge file into the program cur- 


_Fently in memory. 


Remarks 


<filename> is the name used when the file was SAVEd. 
(Your operating system may append a default filename 
extension if one was not supplied in the SAVE command. 
Refer to “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC User’s Guide, for information about pos- 
sible filename extensions under your operating system.) 
The file must have been SAVEd in ASCIl format. (If not, a 
“Bad file mode” error occurs.) 


If any lines in the cartridge file have the same line numbers 
as lines i in the program in memory, the lines from the file on 
will replace the corresponding lines in memory. 


| (MERGEing may be thought of as “inserting” the program 


lines on cartridge into the program in memory.) 


Microsoft BASIC always returns to command level after 
executing a MERGE command. 


MERGE ‘'NUMBRS'' 
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2.39 MIDS 


Format 


Purpose 


Remarks | 


Example 
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MID$(<string exp1>,n[,m])=<string exp2> 


where n and m are integer expressions and <string exp1> 


and <string exp2> are string expressions. 
To replace a portion of one string with another string. 


The characters in <string exp1>, beginning at position 
n, are replaced by the characters in <string exp2>. 
The optional “‘m” refers to the number of characters from 
<string exp2> that will be used in the replacement. If “m” 


is omitted, all of <string exp2> is used. However, regard- 


less of whether “‘m’ is omitted or included, the replacement 
of characters never goes beyond the original length of 
<string exp1>. 


10 A$='' KANSAS CITY, MO'! 
20 MID$(A$,14)=''KS'' 

30 PRINT A$ 

RUN 

KANSAS CITY, KS 


MID$ is also a function that returns a eubetatg ae a ee 
string. See Section 3.25. iD et sig 2a 


MO:BAS:04 


2.40 NAME 

Format NAME <old filename> AS <new filename> 

Purpose To change the name of a cartridge file. 

Remarks — <old filename> must exist and <new filename> must not 

exist; otherwise, an error will result. After a NAME com- 

mand, the file exists on the same cartridge, in the same 
area of cartridge space, with the new name. 

Example Ok 
NAME ''ACCTS'' AS ''LEDGER''! | 
Ok 
In this example, the file that was formerly named ACCTS 
will now be named LEDGER. | 

2.41 NEW 

Format § NEW 


Purpose To delete the program currently in memory and clear all 
variables. 


Remarks NEW is entered at command level to clear memory before 
entering a new program. Microsoft BASIC always returns 
to command level after a NEW is executed. 


Example NEW 


2.42 NULL—Not used 
Format NULL <integer expression> 


Purpose To set the number of nulls to be printed at the end of each @ 
line. 


Remarks For 10 degen hag tape punches, <integer ex- 
aoe should be >=3. When tapes are not being 

l ad, <integer expression> should be 0.or 1 for Tele- 
net} and Teletype-compatible terminal screens. <in- 
eger ial in should be a or 3-for 30 CPS hard copy 


Example Ok 


100 INPUT X 
200 IF X<50 GOTO 800 


Two null characters will be printed after each line. 
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2. a3 ON ERROR GOTO 


Format 


Purpose 


Remarks - 


Note 


Example 


ON ERROR GOTO. <tine number> 


To enable error ‘handling and speaiy the first line of the 


error handling routine. 


Once error handling has been enabled, all errors detected, 
including direct mode errors (e.g., syntax errors), will cause 
a.jump to the specified error handling routine. If <line 


number> does not exist, an “Undefined line” error results. 


To disable error handling, execute an ON ERROR GOTO 
0. Subsequent errors will print an error message and halt 
execution. An ON ERROR GOTO 0 statement that ap- 
pears in an error handling routine causes Microsoft BASIC 
to stop and print the error message for the error that 
caused the trap. It is recommended that all error handling 
routines execute an ON ERROR GOTO 0 if an error is 
encountered for which there is no recovery action. 


If an error occurs during execution of an error handling 


routine, that error message is printed and execution termi- 
nates. Error trapping does not occur within the error han- 


dling routine. 


10 ON ERROR GOTO 1000 
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2.44 ON...GOSUB AND ON...GOTO & 


Format 
Purpose 


Remarks 


Example 
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_ ON <expression> GOTO <list of line numbers> 


ON <expression> GOSUB <list of line numbers> 


To branch to one of several specified line numbers, de- 
pending on the value returned when an expression is 
evaluated. 


The value of <expression> determines which line number 
in the list will be used for branching. For example, if the 
value is three, the third line number in the list will be the 
destination of the branch. (If the value is a noninteger, the 
fractional portion Is rounded.) 


Inthe ON...GOSUB statement, each line number in the list 
must be the first line number of a subroutine. 


If the value of <expression> is zero or greater than the 
number of items in the list (but less than or equal to 255), 
Microsoft BASIC continues with the next executable state- 
ment. If the value of <expression> is negative or greater 
than 255, an “Illegal function call” error occurs. 


100 ON L-1 GOTO 150,300, 320, 390 


2.45 OPEN 


Format OPEN <mode>,[#]<file number>,<filename>[,<reclen>] _ 


Purpose 
Remarks — 


To allow VO to a cartridge file. 

_A cartridge file must be OPENed before any cartridge I/O 
operation can be performed on that file. OPEN allocates a 
buffer for I/O to the file and determines the mode of access 
that will be used with the buffer. 


<mode> is a rl expression whose first character is 
one of the followi 


O Specifies sequent output mode. 
| Specifies sequential input mode. 
R Specifies random input/output mode. 


<file number> is an integer expression whose value is 


~ between 1 and 15. The number is then associated with the 


Note 


Example 


file for as long as itis OPEN and is used to refer other other - 


/O statements to the file. 


<filename> is a string expression containing a name that — 
conforms to your operating system’s rules for cartridge 
filenames. 


<reclen> is an integer expression which, if included, sets 
the record length for random files. The default record — 
length is 128 bytes. 


A file can be OPENed for sequential input or random 
access on more than one file number at a time. A file may 
be OPENed for output, however, on only one file number at 
a time. 

TO: OPEN "2 Et) 2.8 INVEN?? 


See also “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC User's Guide. 
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2.46 OPTION BASE 


Format 


Purpose 


Remarks 


Example 
2.47 OUT 
Format 
Purpose 


Remarks 


Example 
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OPTION BASE n 


where nis 1 or O 


To declare the minimum value for array subscripts. 


The default base is 0. If the statement _ 
OPTION BASE 1 


is executed, the lowest value an array subscript may have » 
is 1. 


OPTION BASE 1 


OUT I,J 


where | and J are integer expressions in the range Oto 255. 
To send a byte to a machine output port. 


The integer expression | is the port number. The integer 
expression J is the data to be transmitted. 


100 OUT 32,100 


-POKE IJ 


where | and J are integer expressions. 
To write a byte into a memory location. 


| and J are integer expressions. The expression | repre- 


sents the address of the memory location and J is the data 


byte. | must be in the range -32768 to 65535. (For interpre- 
tation of negative values of |, see “VARPTR,” Section 
3.43.) | | | 


The complementary function to POKE is PEEK. The ar- 


-gument to PEEK is an address from which a byte is to be 


POKE and PEEK are useful for storing data efficiently, 
loading assembly language subroutines, and passing ar- 


guments and results to and from assembly language sub- 


routines. 


10 POKE &H5A00, &HFF 
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it 
& 


Format 


Purpose 


~ Remarks 
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pees tee TS 


~ PRINT [<list of expressions>] 


To output data at the terminal. 


If <list of expressions> is omitted, a blank line is printed. If 


_ <list of expressions> is included, the values of the ex- 
’ pressions are printed at the terminal. The expressions in 


- the list may be numeric and/or string expressions. (Strings 
_ must be enclosed in quotation marks.) 


_ Print Positions 


~The position of each printed item is determined by the 


punctuation used to separate the items in the list. Microsoft 


_ BASIC divides the line into print zones of 14 spaces each. 

_ In the list of expressions, a comma causes the next value 

to be printed at the beginning of the next zone. A semicolon 

_ Causes the next value to be printed immediately after the 

_last value. Typing one or more spaces between expres- 
sions has the same effect as typing a semicolon. 


If a comma or a semicolon terminates the list of expres- 
sions, the next PRINT statement begins printing on the 


Same line, spacing accordingly. If the list of expressions 
terminates without a comma or a semicolon, a carriage 
return is printed at the end of the line. If the printed line is 
longer than the terminal width, Microsoft BASIC goes to 
the next physical line and continues printing. 


Example 1 


Printed numbers are always followed by a space. Positive 
numbers are preceded by a space. Negative numbers are 
preceded by a minus sign. Single precision numbers that 
can be represented with 6 or fewer digits in the unscaled 
format no less accurately than they can be represented in 
the scaled format, are output using the unscaled format. 
For example, 1E-7 is output as .0000001 and 1E-8(-7) is 
output as 1E-08. Double precision numbers that can be 
represented with 16 or fewer digits in the unscaled format 
no less accurately than they can be represented in the 
scaled format, are output using the unscaled format. For 
example, 1D-15 is output as .0000000000000001 and 
1D-16 is output as 1D-16. 


A question mark may be used in place of the word PRINT in 
a PRINT Statement. ~ 


10 X=5 
20 PRINT X+5,X-5,X*(-5),X75 
30 END 


10 0 —25 S125 
In this example, the commas in the PRINT statement cause 


each value to be printed at the beginning of the next print 
zone. 
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Example 2 


Example 3 
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LIST 

10 INPUT X | 

20 PRINT X ''SQUARED IS'' X?2''AND''; 
50 PRINT X ' ' CUBED Is" ae 

40 PRINT 

50 GOTO 10 


ae 
Be, ener IS 81 AND 9 CUBED IS ‘%29 


22] | | 
21 SQUARED IS AA] AND el CUBED IS 9261 


? 

In this example, the semicolon at the end of line 20 causes 
both PRINT statements to be printed on the same line. Line 
40 causes a blank line to be printed before the next prompt. 


10 FOR X=1 TO 5 
20 J=J+5 

30 K=K+10 

40 ?J;K; 


— 50 NEXT X 


Ok 
RUN 

5 10 10 20 15 30 20 40 25 50 
Ok 


In this example, the semicolons in the PRINT statement 
cause each value to be printed immediately after the pre- 
ceding value. (Don't forget, a number is always followed by 
a space, and positive numbers are preceded by a space.) 


In line 40, a question mark is used instead of the word 
PRINT. 


2.50 PRINT 
Format 
Purpose 
Remarks 


and 
Examples 


6ogs? 
! 


“\n spaces\” 


USING 


| PRINT USING <string exp>;<list of expressions> 


To print strings or numbers using a specified format. 


<list of expressions> is comprised of the string expres- 
sions or numeric expressions that are to be printed, sepa- 
rated by semicolons. <string exp> is a string literal (or 
variable) composed of special formatting characters. 
These formatting characters (see below) determine the 
field and the format of the printed strings or numbers. 


String Fields 


When PRINT USING is used to print strings, one of three 
formatting characters may be used to format the string 
field: 


Specifies that only the first character in the given string is to — 
be printed. 


Specifies that 2+n characters from the string are to be 
printed. If the backslashes are typed with no spaces, two 
characters will be printed; with one space, three characters 
will be printed, and so on. If the string is longer than the 
field, the extra characters are ignored. If the field is longer 
than the string, the string will be left-justified in the field and 
padded with spaces on the right. 


Example: 


10 AG=''LOOK'' :BE=''OUT'' 

30 PRINT USING ''!''; A$; BS 

40 PRINT USING ''\\''; A$; BS 

SO PRINT USING ''\\''; A$; BE; ttt! 
RUN 

LO 

LOOKOUT 

LOOK OUT ! ! 


81 


“R” 


PRINT USING “eee. #4 poet 654) 


Specifies a variable length string field. When the field is 
a weunee with “&, the ra is ou without eae 


| Example: 


10 AG=! ‘LOOK! :Bg=" “Our”! 


20 PRINT USING ''!'' Ag; 
50 PRINT USING ''&'';B$ 
RUN 


— -LOUT oe 
WineAe Fields 


. When PRINT USING i is sea to sant numbers, the follow- 
_ ing special characters may be used to format the numeric 


field: 


A number sign is used to represent each digit position. 
Digit positions are always filled. If the number to be printed 


has fewer digits than positions specified, the number will 


be right-justified (preceded by spaces) in the field. 


. Adecimal point may be inserted at any position i in the field. 


lf the format string specifies that a digit is to precede the 
decimal point, the digit will always be printed (as 0, if 


aa eet) Numbers < are founded as necessary. 


~ PRINT USING ee. oH! i a : 


0.78 


oe 
¥ 


987 .65 


PRINTUSING''##.##'';10.2,5.3; 66. 789, oe 
10.20 5.30 66. 790.23 


In the last example, three spaces were inserted at the end 
of the format string to separate the printed values on the 
line. 


ak 


**¢ 


: Aplus sign at the b gi 
_. Cause the sign of the number (plus or minus) to be printed 
before or sani the| number. 


Causes leading spa 
asterisks. The **. 


t MHGOSA. 2 


ining or end of the format string will 


A minus sign att end of the format field will cause 
| negative numbers ) be printed with a trailing minus sign. 


_ PRINT USING : HE. ## '';-68.95,2.4,55.6, 


—~.9-68.95 +2. ‘ie +55 .60 —0.90 


PRINT. USING ! ‘##. ##-'';-68.95,22.449, 


~7.01 68.95- 22. 45 '7.01- 


A double asterisk at the beginuina of the format string 
2S in the numeric field to be filled with 
Specifies positions for two more 


digits. 


. PRINT U USING ! deg. #'':12.39,-0.9,765.1 
*12.4 *-0. 9765.1 


os A double dollar sign causes a dollar sign to be printed to the 


immediate left of the formatted number. The $$ specifies 


___ two more digit positions, one of whichis the dollar sign. The 


exponential format cannot be used with $$. Negative num- 
bers cannot be a une the minus sign trails to the 


— right. 


PRINT USING “gseee ##''; 456. 78 
$456 .78 


The **$ at the peur of a format string combines the 


_ effects of the above two symbols. Leading spaces will be 


asterisk-filled and a dollar sign will be printed before the 
number. **$ specifies three more digit positions, one of 
which is the dollar sign. 


PRINT USING ““"*$##.##7:2.34 
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A comma that is to the left of the decimal point in a format- 


ting string causes a comma to be printed to the left of every 


third digit to the left of the decimal point. A comma thatis at 
the end of the format string is printed as part of the string. A 
comma specifies another digit position. The comma has no 
effect if used with the exponential (— —) format. 


PRINT USING ''####, .-##''; 1234.5 
1,234.50 oe 


PRINT USING ''####. ##, nr 5 1234.5 
1234.50, 


Four carets (or up-arrows) may be placed after the digit 
position characters to specify exponential format. The four 
carets allow space for E+xx to be printed. Any decimal 
point position may be specified. The significant digits are | 
left-justified, and the exponent is adjusted. Unless a lead- 
ing + or trailing + or -is specified, one digit position will be 
used to the left of the cece) npoIt to gu a apace.c or a 
minus oon: 


PRINT USING BE. we t t ' '' 234.56 


2.355E+02 © 


PRINT USING !! aerere ' t ro saaene 
-8889E +06 


PRINT USING ''+. PENA TT: 123 
+, 12E+035 


An underscore in vthe format string causes s the next charac- | 
ter to be nee as a re character. 


PRINT USING !! Ht. ## al 12. 34 


Pie. ore 


The literal character itself may be an nunderscore by placing 
“in the format string. 


% 


hi .00 


If the number to be printed is larger than the specified 
numeric field, a t sign is printed in front of the num- 
ber. If rounding the number to exceed the field, a 
percent sign will be printed in front of the rounded number. 


PRINT USING ''##.##'':111.22 


pill.ae | 


PRINT USING '' .##''; .999 


If the number of digits specified exceeds 24, an “Illegal 
function call” error will result. 


2.51 PRINT? AND PRINT# USING 


Format 


_ Purpose 


Remarks 
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PRINT#<file number>, (USING <sting exp> ‘}<list sh 
expressions> 


To write data to a sequential cartridge file. 


<file number> is the number used when the file was 
OPENed for output. <string exp> consists of formatting 
characters as described in Section 2.50, “PRINT USING.” 
The expressions in <list of expressions> are the numeric 
and/or an expressions that will be written to the file. — 


PRINT# jess not compress data on the cartridge. An 
image of the data is written to the cartridge, just as it would 
be displayed on the terminal screen with a PRINT state- 
ment. For this reason, care should be taken to delimit the 
data on the cartridge, so that it will be input correctly from 
the cartridge. 


In the list of expressions, numeric expressions should be 
delimited by semicolons. For example: | 


PRINT#1,A;B;C;X;Y;Z 

(If commas are used as delimiters, the extra blanks that are 
inserted between print fields will also be written to the 
Cartridge.) 

String expressions must be separated by semicolons in 
the list. To format the string expressions correctly on the 
cartridge, use explicit delimiters in the list of expressions. 


For example, let A$=“‘CAMERA” and B$=“93604-1”. The 
statement 


PRINT#1, A$; BE 


there are no delimiters, this could not be input as two 
Separate strings. To correct the problem, insert explicit 
delimiters into the PRINT# statement as follows: 


would write cette, to the cartridge. Because 


PRINT#1,A$;'','': Bg 

The image written to cartridge is 
CAMERA , 93604~1 | 
which can be read back into two string variables. 

If the strings themselves contain commas, semicolons, 
significant leading blanks, carriage returns, or line feeds, 


write them to the cartridge Surrounded by explicit quotation 
marks, CHR$(34). 


For example, let A$="CAMERA, AUTOMATIC” and B$=“ 
93604-1”. The statement | 


PRINT#1, A$: BY 
would write the following image to the cartridge: 
CAMERA , AUTOMATIC 93604-1 

And the statement 


INPUT#1, A$, BG _ 


would input “CAMERA” to A$ and “AUTOMATIC 93604-1” 

to B$. To separate these strings properly on the cartridge, 
write double quotation marks to the cartridge image using 
CHR&$(34). The statement 


PRINT#1, CHR$ (34) AG: CHRG (34) ; CHR$(34) ; BS; 
CHR$ (34) | 


writes the following image to the cartridge: 


‘CAMERA, AUTOMATIC'''' 93604-1'' 
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And the statement 
INPUT#1, A$, BY 


would input “CAMERA, AUTOMATIC” to A$ and “93604- 
1” to BS. 


The PRINT# statement may also be used with the USING 
option to control the format of the cartridge file. For ex- 
ample: 


PRINT#1,USING' '$$###.##,'';J:K;L 


For more examples using PRINT#, see “Microsoft BASIC 
Cartridge File Handling,” in the Microsoft BASIC User's 
Guide. | 


See also “WRITE#,” Section 2.68. 
2.52 PUT 
Format PUT. [#]<file number>[,<record number>] 


Purpose To write a record from a random buffer to a random car- 
tridge file. 


Remarks <file number> is the number under which the file was 
OPENed. If <record number> is omitted, the record will 
assume the next available record number (after the last 
PUT). The largest possible record number is 32,767. The 
smallest record number is 1. : 


Example See “Microsoft BASIC Cartridge File Handling I/O,” in the 
Microsoft BASIC User’s Guide. | 


Note PRINT#, PRINT# USING, and WRITE# may be used to 
_- put characters in the random file buffer before executing a 
PUT statement. 


In the case of WRITE#, Microsoft BASIC pads the buffer 
with spaces up to the carriage return. Any attempt to read 
or write past the end of the buffer causes a “Field overflow” 
error. 
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2.53 RANDOMIZE 


Format — 


Remarks 


example 


iba 


~ and change the ¢ 
10 RANDOMIZE. 


20 FORI=1T05_ 
30 PRINT RND; 


Ok 


RANDOMIZE [ sees 


To reraee the: number Generator, 


if <expression> i omitted, Microsoft BASIC suspends 
stior and asks for a value by printing 


“Random yun ber Seed (-32768 to 32767)? 


: before executing AN 


if the random number generator is not reseeded, the RND 
function returns the same sequence of random numbers 
each time the program is RUN. To change the sequence of 


~ random numbers: inhi time the program is RUN, place a 


RANDOMIZE statement at the beginning of the program 


gument with each RUN. 


40 NEXTI | 
RUN | 
Random Number Seed (—32768 to 32767)? 3 
(user types 3) 

,88598 .4846 P .586328 .119426 .709225 


RUN ! 
Random Number Seed (-—32768 to 32767)? 4 
(user ee 4 for new sequence) 

.803506 .162 

Ok 

RUN _ | 

Random Number Seed (-32768 to 32767)? 3 

(same sequence as first RUN) 

.88598 .484668 .586328 .119426 .709225 

Ok 


62 .929364 .292443 .322921 


2.54 READ 
Format 


Purpose 


Remarks 


Example 1 


110 DATA 3.08, 


READ <list of variables> 


Toread values from a DATA statement and assign themto | 


variables. (See “DATA,” Section 2. 10: ) 


A READ statement must always be used in scejancien 


with a DATA statement. READ statements assign vari- 
ables to DATA statement values on a one-to-one basis. 
READ statement variables may be numeric or string, and 
the values read must agree with the variable types speci- 
fied. If they do not agree, a “Syntax error’ will result. 


A single READ statement may access one or more DATA — 


statements (they will be accessed in order), or several 
READ statements may access the same DATA statement. 
If the number of variables in <list of variables> exceeds 
the number of elements in the DATA statement(s), an “Out 
of data” error message is printed. If the number of vari- 
ables specified is fewer than the number of elements in the 
DATA statement(s), subsequent READ statements will 
begin reading data at the first unread element. If there are 
no subsequent READ statements, the extra data is ig- 
nored. 


To reread DATA statements from the start, use the RE- 
STORE statement (see “RESTORE,” Section 2.57) 


80 FOR I=1 TO 10 
90 READ A(T) 
100 NEXT I 


oe i 
120 DATA 5.08,5.5 


This program segment READs the values from the DATA 
statements into the array A. After execution, the value of 


A(1) will be 3.08, and so on. 


Example 2. LIST | i 
10 PRINT *"CITY'?®.; © °STATEO.. (4-7 7pta 
20 READ C$,S$,Z 
30 DATA ''DENVER,'' , COLORADO, 80211 
40 PRINT cs, S$,Z | 


Ok | 
RUN © _ | 

CITY: . ios ZIP 
DENVER, OLORADO 80211 
Ok 


This program READs string and numeric data from the 
DATA statement nr line 30.. 
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2.55 REM 
Format 
Purpose 


Remarks 


Important 


Example 


92 


REM <remark> 
To allow explanatory remarks to be inserted in a program. 


REM statements are not executed but are output exactly 
as entered when the program is listed. 


REM statements may be branched into from a GOTO or 
GOSUB statement. Execution will continue with the first 
executable statement after the REM statement. 


Remarks may be added to the end of a line by preceding 
the remark with a single quotation mark instead of :REM. 


Do not use this in a data statement, because it would be 
considered legal data. 


120 REM CALCULATE AVERAGE VELOCITY 
130 FOR I=1 TO 20 
140 SUM=SUM + V(T) 


or 


120 FOR I=1 TO 20 ‘CALCULATE AVERAGE VELOCITY 
130 SUM=SUM+V(T) 


(140 NEXT I 


2.56 RENUM 


Format 


Remarks 


RENUM [[<new number>|[,[<old number>] 
[,<increment>]]] _ 
To renumber program lines. 

| 


<new number> is the first line number to be used in the 
new sequence. The default is 10. <old number> is the line 
in the current program where renumbering is to begin. The 
default is the-first line of the program. <increment> is the — 


increment to be used in the new sequence. The default is 


10. | | 
RENUM also changes all line number references following 
GOTO, GOSUB, THEN, ON...GOTO, ON...GOSUB, and 
ERL statements to reflect the new line numbers. If anonex- 
istent line number appears after one of these statements, 
the error message “Undefined line number in xxxxx” is 


_ printed. The incorrect line number reference is not changed 


Note 


Examples 


by RENUM, but line number yyyyy may be changed. 


| 


RENUM cannot be used to change the order of program - 

lines (for example, RENUM 15,30 when the program has 
three lines numbered 10, 20 and 30) or to create line 
numbers greater than 65529. An “Illegal function call” 
error will result. 


RENUM | Renumbers the entire 
program. The first new 

line number will be 10. Lines 
will be numbered in 
increments of 10. 


RENUM 300,,50 © _ Renumbers the entire 
| : program. The first new 
line number will be 300. 
Lines will be numbered in 
increments of 50. 


RENUM 1000,900,20 Renumbers the lines from 


900 up so they start with 
line number 1000 and are 
numbered in increments of 
20. 
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2.57 RESTORE 
Format ~ RESTORE [ <line number>] 


Purpose To allow DATA statements to be reread from a specified 
line. 


Remarks After a RESTORE statement is executed, the next READ 
statement accesses the first item in the first DATA state- 
ment in the program. If <line number> is specified, the 
next READ statement accesses the first item in the epee 

fied DATA statement. 


Example 10 READ A,B,C 
20 RESTORE 
30 READ D,E,F 
40 DATA 57, 68, 79 
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2.58 RESUME 
Formats RESUME 
RESUME 0 


RESUME NEXT > 
RESUME <line number> 


Purpose To continue program execution after an error recovery 
procedure has been performed. | 


Remarks Any one of the four formats shown above may be used, 
depending upon where execution is to resume: 


RESUME Execution resumes at the 


or ,& | Statement which caused the. 
RESUME 0 © : error. | 
RESUME NEXT | Execution resumes at the 


| _ Statement immediately fol- 


lowing the one which caused 


the error. 


RESUME <linenumber> Execution resumes at 
| _ <line number>. 


A RESUME statement that is not in an error handling 
routine causes a “RESUME without error” message to be 
printed. | | : 


Example 10 ON ERROR GOTO 900 


| 
i 


900 IF (ERR=230) AND(ERL=90) THEN PRINT 
'' TRY AGAIN'': RESUME 80 
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2.59 RUN 


Format 1 RUN [ <line number>] 
Purpose To execute the program currently in memory. : a 


Remarks lf <line number> is specified, execution begins on that 
line. Otherwise, execution begins at the lowest line num- 
ber. Microsoft BASIC always returns to command level 
after a RUN is executed. 


Example RUN 

Format 2 RUN <filename>[,R] 

Purpose To load a file from cartridge into memory and run it. 

Remarks <filename> is the name used when the file was SAVEd. 
(Your operating system may append a default filename 
extension if one was not supplied in the SAVE command. 
Refer to “Microsoft BASIC Cartridge File Handling,” in the © 
Microsoft BASIC User's Guide for information about pos- 
sible filename extensions under your operating system.) 
RUN closes all open files and deletes the current contents 
of memory before loading the designated program. How- 
ever, with the “R” option, all data files remain OPEN. 

Example RUN ''NEWFIL'! R 


See also “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC User's Guide. 
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2.60 SAVE 
Format 
Purpose _ 


‘Remarks 


Examples 


_ ating system's | 
_ ing system may append a default filename extension if one 


SAVE <filename>[{,A],P}] 


To save a program file on cartridge. | 


<filename> is a quoted string that conforms to your oper- 


squirements for filenames. (Your operat- 


was not supplied in the SAVE command. Refer to “Micro- 
soft BASIC Cartridge File Handling,” in the Microsoft 
BASIC User's Guide for information about possible file- 
name extensions under your operating system.) If <file- 


name> already exists, the file will be written over. 


Use the A option to save the file in ASCII format. Other- 


wise, Microsoft BASIC saves the file in a compressed 


binary format. ASCII format takes more space on the car- 
tridge, but some cartridge access requires that files be in 
ASCIl format. For instance, the MERGE command requires 
an ASCII format file, and some operating system com- 
mands such as LIST may require an ASCII format file. 


Use the P option to protect the file by saving it in an 
encoded binary format. When a protected file is later RUN 
(or LOADed), any attempt to list or edit it will fail. 

SAVE ''COM2'',A 
SAVE ''PROG'',P 


See also “Microsoft BASIC Cartridge File Handling,” in the 
Microsoft BASIC ser's Guide. 
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2.61 STOP 
Format 


Purpose 


Remarks 


Example 


STOP 


To terminate program execution and return to command 


level. 


| STOP statements may be used anpahere ina program to 


terminate execution. When a STOP is ; encountered, the 
following message is printed: 


Break | in line nnannn 


Unlike the END statement, the STOP statement does not 
close files. 


Microsoft BASIC sana returns to vcominand level after a 
STOP is executed. Execution is resumed by issuing a 
CONT command (see Section 2.8). 


10 INPUT fis B,C 


20 K=AT2*5.3:L= Bt3/. 26 


30 STOP 
40 M=C*K+100: PRINT M 
RUN . 


iL eso 
BREAK IN 350 


2.62 SWAP 
Format 
Purpose 


Remarks 


Example 


20 PRINT A$ C$ BY 


RUN | 


SWAP <variable>,<variable> 


To exchange the values of two variables. 
Any type variable so y be SWAPped (integer, single preci- 


sion, double precision, string), but the two variables must 


be of the same or a “Type mismatch” error results. 


LIST 
10 A$='' ONE'' : B="! ALL '' : C=!" FOR 


50 SWAP AG, BY : 
40 PRINT A$ C$ B$ 


Ok 
ONE FOR ALL 
ALL FOR ONE 
Ok 


2.63 TRON/TROFF 
Format TRON 
TROFF 
Purpose To trace the execution of program statements. 


Remarks As an aid in debugging, the TRON statement (executed in 
either direct or indirect mode) enables a trace flag that 
prints each line number of the program as it is executed. 
The numbers appear enclosed in square brackets. The 
trace flag is disabled with the TROFF statement (or when a 
NEW command is executed). 


Example TRON 


10 K=10 

20 FORJ=1 T02 
30 L=K + 10 

40 PRINT 33 KL 
50 K=K+10 


RUN 
[10][20][30][40] 1 10 20 
[50] [60][30][40] 2 20 30 
[50] [60] [70] 
Ok 

TROFF 

Ok 
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2.64 WAIT 


Format 


Purpose 


Remarks 


Important 


Example 


WAIT <port number>,I[,J] 
where | and J are integer expressions. 


To suspend program execution while monitoring the status 


of a machine input port. 


The WAIT statement causes execution to be suspended 
until a specified machine input port develops a specified bit 
pattern. The data read at the port is exclusive OR‘ed with 
the integer expression J, and then AND‘ed with I. If the 
result is zero, Microsoft BASIC loops back and reads the 


_ data at the port again. If the result is nonzero, execution 


continues with the next statement. If J is omitted, it is 
assumed to be zero | 


It is possible to enter an infinite loop with the WAIT state- 
ment, in which case it will be necessary to manually restart 
the machine. To avoid this, WAIT must have the specified © 
value at <port number> during some point in the program 
execution. te & a ; 


{ 


100 WAIT 32,2 — 
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2.65 WHILE...WEND 


Format 


Purpose 


| Remarks 


Example 
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150 WEND 


WHILE <expression> 
[<loop statements>] 
WEND 


To execute a series of statements in a loop as long as a 
given condition is true. 


If <expression> is not zero (i.e., true), <loop statements> 

are executed until the WEND statement is encountered. 
Microsoft BASIC then returns to the WHILE statement and 
checks <expression>. If it is still true, the process is 
repeated. If it is not true, execution resumes with the 
statement following the WEND statement. 


WHILE/WEND loops may be nested to any level. Each 
WEND will match the most recent WHILE. An unmatched 
WHILE statement causes a “WHILE without WEND” error, 
and an unmatched WEND statement causes a “WEND 
without WHILE” error. oe ae 


90 ‘BUBBLE SORT ARRAY A$ 
100 FLIPS=1 'FORCE ONE PASS THRU LOOP 
110 WHILE FLIPS 


115 FLIPS=0 

120 FOR I=1 TO J-1 

130 IF A$(I)>A$(I+1) THEN 
SWAP A$(I), 
A$(I+1):FLIPS=1 

140 NEXT I 


2.66 WIDTH 
Format 


Purpose 


Remarks 


line printer. 


WIDTH [LPRINT |<integer expression> 


To set the printed fine width in number of characters for the 
terminal or line printer. 


is omitted, the line width is set at the 
is included, the line width is set at the 


lf the LPRINT opti 
terminal. If LPRI 


<integer expression> must have a value in the range 15 to 


_ 255. The default width is 72 characters. 


_. If <integer expression> is 255, the line width is “infinite”: 
_ that is, Microsoft BASIC never inserts a carriage return. 


Example 


However, the position of the cursor or the print head, as 
given by the POS or LPOS function, returns to zero after 
position 255. 


FO: FRINT ? ' ABCDEFGHI JKLMNOPQRSTUVWXYZ: 
RUN 
ABCDEFGHIJ enn 
Ok 
WIDTH 18 
Ok 

RUN 
ABCDEFGHIJ KLMNO PQR 
STUVWXYZ : 

Ok 


103 


2.67 WRITE 
Format 
Purpose 


Remarks 


Example 
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WRITE [<list of expressions>] 


To output data at the terminal. 


If <list of expressions> is omitted, a blank line is output. If 


<list of expressions> is included, the values of the ex- 


pressions are output at the terminal. The expressions in 
the list may be numeric and/or string expressions. They 
must be separated by commas. 


When the printed items are output, each item is separated 
from the last by a comma. Printed strings are delimited by 
quotation marks. After the last item in the list is printed, 
Microsoft BASIC inserts a carriage return/ line feed. 


WRITE outputs numeric values using the same format as 
the PRINT statement. (See Section 2.49.) 


10 A=80:B=90:C$=''THAT'S ALL'' 
20 WRITE A,B,CG 
RUN | 
80), 90? "THAT'S: ALL?! 
Ok 


2.68 WRITE# 


Format 
Purpose 
Remarks 


Example 


WRITE#<file number>,<list of expressions> 


To write data to a sequential file. 


—<file number> is the number under which the file was 


OPENed in “O” mode (see “OPEN,” Section 2.45). The 
expressions in the list are string or numeric expressions. 
They must be Separated by commas. 


The difference between WRITE# and PRINT# is that 
WRITE# inserts commas between the items as they are 
written to cartridge and delimits strings with quotation 
marks. Therefore, it is not necessary for the user to put 
explicit delimiters in the list. A carriage return/line feed 
sequence is inserted aes the last item in the list is written 
to eae 


Let AB=''CAMERA'' and BE=''93604-1'' 
The statement: 

WRITE#1, A$, BS 

writes the following image to cartridge: 
“CAMERA”, “‘93604-1” 


A subsequent INPUT# statement, such as 


_INPUT#1, AG, BS 3 


would input “CAMERA” to A$ and “93604-1” to BS. 
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Chapter 3 Microsoft BASIC Functions 


Introduction 
3.1 ABS 3.23 LOG 
3.2 ASC 3.24 LPOS | eS 
3.3 ATN 3.25 MIDS | 
3.4 CDBL 3.26 MIK$, MKSS, MKDS$ _ 
3.5 CHRS 3.27 OCT$ 
3.6 CINT | 3.28 PEEK 
3.7 COS 3.29 POS 
3.8 CSNG © 3.30 RIGHTS 
3.9 CVI, CVS, CVD 3.31 RND 
3.10 EOF 3.32 SGN 
3.11 EXP 3.33 SIN 
3.12 FIX | 3.34 SPACE$ 
3.13 FRE 3.35 SPC 
3.14 HEX$ 3.36 SQR 
3.15 INKEY$ 3.37 STR$ 
3.16 INP — 3.38 STRINGS 
3.17 INPUTS | —- 3.39 TAB | 
3.18 INSTR | 3.40 TAN : 
3.19 INT 3.41 USR CO 
3.20 LEFT$ 3.42 VAL 
3.21 LEN 3.43 VARPTR 
3.22 LOC 
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Microsoft BASIC intrinsic functions are described in this chapter. The 
functions may be called from any program without further definition. 


Arguments to functions are always enclosed in parentheses. In the 
formats given for the functions in this chapter, the arguments have been 
abbreviated as follows: 


X and Y Represent any numeric expressions. 
land J Represent integer expressions. 


X$ and Y$ Represent string expressions. 


If a floating-point value is supplied where an integer is required, Microsoft 
BASIC will round the fractional ion and use the resulting integer. 
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3.1 ABS 
Format 
Format 
Action 


Example 


3.2 ASC 
Format 


Action 


Example 
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ABS(X) 7 - ve 
ABS(X) | ee er a @ 


Returns the absolute value of the expression X. 


PRINT ABS (7*(-—5) ) 
55 
Ok 


ASC(X$) 


Returns a numerical value that is the ASCII code for the 
first character of the string X$. (See Appendix C for ASCII 
codes.) If X$ is null, an “Illegal function call” error is re- 


turned. c 


10 X$=''TEST'! 
20 PRINT ASC(X$) 
RUN 

84 
Ok 


See the CHR$ function, Section 3.5, for details on ASCII- 
to-string conversion. 


3.3 ATN 
Format 


Action 


Example 


3.4 CDBL 
Format 
Action 


Example 


(10 A=454.67 


RUN 


ATN(X) 


Returns the arctangent of X in radians. Result is in the 
range -pi/2 to pi/2. The expression X may be any numeric 
type, but the evaluation of ATN is always performed in 


single precision. — 


10 INPUTX 
20 PRINT ATN(X) 
RUN 


CDBL(X) 


Converts X to a double precision number. 


20 PRINT A : CDBL | A) 


454.67 454.6700134277344 
Ok - 


109 


3.5 CHR$ 
Format 


Action 


Example 


3.6 CINT 
Format 


Action 


Example 
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CHR3§(!) 


~ Returns a string whose one character is ASCII character |. 


(ASCII codes are listed in Appendix C.) CHR$ is commonly 


used to send a special character to the terminal. For in- 


stance, the BEL character (CHR$(7)) could be sent as a 
preface to an error message, or a form feed (CHR3$(12)) 
could be sent to clear a terminal screen and return the 
cursor to the home position. — | 


PRINT CHR$(66) B 
Ok 


See the ASC function, Section 3.2, for details on ASCIl-to- 
numeric conversion. : | 


CINT(X) 


Converts X to an integer by rounding the fractional portion. 
If X is notin the range -32768 to 32767, an “Overflow” error 
occurs. 


PRINT CINT(45.67) 
46 Ok 


See the CDBL and CSNG functions for details on convert- 
ing numbers to the double precision and single precision 
data type, respectively. See also the FIX and INT func- 
tions, both of which return integers. | 


3.7 COS 
Format © 


Action 


3.8 CSNG 
| Format 
Action 


Example 


COS(X) 


{ 
i 


Returns the cosine of X in radians. The calculation of 
COS(X) is oe in single precision. 


: 10 X= 2*COS(. 4 


20 PRINT X 

RUN 
1.84212 © 
Ok 


CSNG(X) 


) 


| 
fi 


Converts X to a single precision number. 


10 A# = 975.3421# 20 PRINT A#; CSNG(A#) RUN 


975.3421 975 


See the CINT and 


oe Ok 


CDBL functions for converting numbers 


to the integer ad double precision data types, respect- 


ively. 
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3.9 CVI, CVS, CVD 


Format 


Action 


Example 


3.10 EOF 
Format 


Action 


Example 
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CVI(<2-byte string>) CVS(<4-byte string>) CVD(<8-byte 
string>) 


Convert string values to numeric values. Numeric values 
that are read in from a random cartridge file must be 
converted from strings back into numbers. CVI converts a 
2-byte string to an integer. CVS converts a 4-byte string to 
a single precision number. CVD converts an 8-byte string 
to a double precision number. 


70 FIELD #1,4 AS NG, 12 AS BG, ... 80 GET #1 90 
Y=CVS (NG) ? - 


See also “MKI$, MKS$, MKD$,” Section 3.26 and “Micro- 
soft BASIC Cartridge File paneling: 3 in the Microsoft 
BASIC User's Guide. | 


EOF(<file number>) 


Returns -1 (true) if the end of a sequential file has been — 


reached. Use EOF to test for end-of-file while ili 
to avoid “Input past end” errors. 


10 OPEN **I** 1, °*DATA'" 
20 C=0 

350 IF EOF(1) THEN 100 

40 INPUT #1,M(C) 

50 C=C+1:GO0OTO 30 


3.11 EXP 
Format 


Action | 


Example 


3.12 FIX 
Format 


Action 


continues. | 
Bip en 


RUN © 


Ok 


Ok 


EXP(X) 


must be <=87. . If EXP overflows, the “Overflow” 
error message is displayed, machine infinity with the ap- 
propriate sign is 


Returns e (base : natural logarithms) to the power of X. X 


Supplied as the result, and execution 


: 
20 PRINT EXP(X-1) 


04.5982 
Ok 


FIX(X) 


Returns the truncated integer part of X. FIX(X) is equiva- — 
lent to SGN(X)* INT(ABS(X)). The major difference be- 
tween FIX and INT is that FIX does not return the next 
lower number for negative X. 


Examples PRINT FIX(58.75) 
58 — | 


PRINT FIX(-58.75) _ 
58 : 
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3.13 FRE 


Format 


Action 


Example 


3.14 HEX$ 
Format 


Action 


Example 
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FRE(0) FRE(‘ ”) 


Arguments to FRE are dummy arguments. FRE returns 
the number of bytes in memory not being used by Microsoft 
BASIC. 


FRE(‘“ ”) forces a garbage collection before returning the 
number of free bytes. Be patient: garbage collection may 
take 1 to 1-1/2 minutes. 


Microsoft BASIC will not initiate garbage collection until all 
free memory has been used up. Therefore, using FRE(" ”) 
periodically will result in shorter delays for each garbage 
collection. 


PRINT FRE(0) 
14542 
Ok 


HEX$(X) 


Returns a string which represents the hexadecimal value 
of the decimal argument. X is rounded to an ninteger before 
HEX$(X) is evaluated. 


10 INPUT X 

20 A$=HEXG (X) 

30 PRINT X ''DECIMAL IS '' A$ '' HEXADECIMAL' ' 
RUN 


rors 


32 DECIMAL IS 20 HEXADECIMAL 
Ok 


See the OCT$ function, Section 3.27, for details on octal 
conversion. 


3.15 INKEY$ 
Format 


Example © 


3.16 INP 
Format 


Action 


Example 


Returns either a or 


INP(1) 


INKEY$ 


ne-cnaracter string containing a charac- 
ter read from the terminal or a null string if no character is 
inal. No characters will be echoed. All 
through to the program except for 
inates the program. 


characters are p: 


| 
1000 'TIMED INPUT SUBROUTINE 


1010 RESPONSE$=!!'' | 
1020 FOR IZ=1 TO TIMELIMITZ 

1030 A$=INKEY$ : IF LEN(A$) =O THEN 1060 
1040 IF ASC(A$)=13 THEN TIMEOUT%=0 : RETURN 
1050 RESPONSE$=RESPONSE$+A$ 

1060 NEXT 1% 

1070 TIMEOUTZ=1 : RETURN 


j 


Returns the byte read from port |. | must be in the range 0 to 
255. INP is the complementary function to the OUT state- 
ment, Section 2.47. 


100 A=INP(255) 
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3.17 INPUTS 
Format INPUT$(X[[#]Y]) 


Action Returns a string of X characters, read from the terminal or @ 
from file number Y. If the terminal is used for input, no 
characters will be echoed. All control characters are 
passed through except CMD-C, which is used to interrupt 
the execution of the INPUT$ function. 


Example 1 5 'LIST THE CONTENTS OF A SEQUENTIAL FILE IN 
HEXADECIMAL 
10 OPEN''I'',1,''DATA'! 
20 IF EOF(1) THEN5O | 
30 PRINT HEX$( ASC ( ENEUT ON L, #1) ) > 
40 GOTO 20 
50 PRINT 
60 END 


Example 2 


100 PRINT ''TYPE P TO PROCEED OR S TO STOP" ' 
110 X$=INPUT$ (1) 
120 IF X$=''P'' THEN 500 

130 IF X$=''S"! THEN 700 ELSE 100 
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3.18 INSTR 
Format 


Action 


Example 


Note 


Format 
Action 


Examples 


INSTR([IJX$,Y$) 


| 


Searches for the first occurrence of string Y$ in X$, and 
returns the positior at which the match is found. Optional 
offset | sets the DOsition for starting the search. | must be in 
the range 1 to 255. If | is greater than the number of 
characters in X$ (LEN(X$)), or if X$ is null or Y$ cannot be 
found, INSTR returns 0. If Y$ is null, INSTR returns | or 1. 

X$ and Y$ may be string variables, string expressions, or 
string literals. 


10 X$=''ABCDEB'' 

20 Y$='! ‘BI ' 

30 PRINT INSTR (XS, Y$) ; INSTR(4, X$, vg ) 

RUN 
26 

Ok 


| 
| 


If |=Ois specified, the “Illegal function call” error message 
will be returned. — 


INT(X) 


Returns the largest integer <=X. 


PRINT INT(99.89) 
99 
Ok 


PRINT INT(- oe: "0 
-13 
Ok 


See the CINT ” FIX functions, Sections 3.6 and 3.12, 
respectively, i also return integer values. 


3.20 LEFT$ 
Format LEFT$(X$,I) a | @ 


Action Returns a string comprising the leftmost I characters of X$. 
| must be in the range 0 to 255. If | is greater than the 
number of characters in X$ (LEN(X$)), the entire string 
(X$) will be returned. If |=0, the null String (length zero) is 
returned. 


Example 10 A$=''BASIC'! 
20 BE=LEFT$ (AG, 5) 
30 PRINT B$ 
BASIC 
Ok 


Also see the MID$ and RIGHT$ functions, Sections 3.25 
and 3.30, respectively. 


3.21 LEN | 7 — © 


Format LEN(X$) 


Action Returns the number of characters in X$. Nonprinting char- 
acters and blanks are counted. 


Example 10 X$='' PORTLAND, OREGON" 
20 PRINT LEN(X$) 
16 
Ok 
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3.22 LOC 


Format 


Action 


Example 


LOC(<file el 


where <file “as is the number under which the file 
was OPENed. 


e files, Loc returns the record num- | 
itten from a GET or PUT statement. If the 
file was opened but no cartridge I/O has been performed 
yet, LOC returns a0. With sequential files, LOC returns the 
number of sectors (128-byte blocks) read from or written to 
the file since it OPENed. | 


200 IF LOC(1)>50 THEN STOP 


119 


3.23 LOG 
Format 


Action 


Example 


LOG(X) 


Returns the natural logarithm of X. X must be seals 
than zero. 


| PRINT LOG(45/7) — 


l, 86075 Ok 


3.24LPOS 


Format 


Action 


Example 


120 


LPOS(X) 


Returns the current position of the line printer print head 
within the line printer‘s buffer. Does not necessarily give 
the physical position of the print head. X is a dummy 
argument. 


100 IF LPOS(X)>60 THEN LPRINT CHR$(13) 


3.25 MIDS 
Format 


Example 


MID$(X$;IEJ]) 


Returns a string of length J characters from X$, beginning 


acter. | and J must be in the range 1 to 255. 


| If J is omitted or if here are fewer than J characters to the 


betes , all rightmost characters beginning 


with the Ith character are returned. If | is greater than the 


characters in X$ (LEN(X$)), MID$ returns a null 


LIST 
10 A$=''GOOD ' 1 
20 BE=' ‘MORNI G EVENING AFTERNOON'' 
50 PRINT AG; mr (BS,9,7) | 
Ok 
RUN 
GOOD EVENING 
Ok : 
| 
Also see the LEFT. 18 and RIGHT$ functions, Sections 3.20 — 
and 3.30, respectively. 


If l=Ois specified, the aoe function call” error Lae 
will be returned. : 
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3.26 MKI$, MKS$, MKD$ 


Format 


Action 


Example 


3.27 OCTS$ 


Format 


Action 


Example 
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MKI$(<integer expression>) MKS$(<single precision ex- 
Pee MKD$ cee peeeien expression>) 


| Convert numeric values to string values. Any numeric value 


that is placed in a random file buffer with an LSET or RSET 
statement must be converted to a string. MKI$ converts an 


integer to a 2-byte string. MKS$ converts a single precision 
number to a 4-byte string. MKD$ converts a double preci- 


sion number to an 8-byte string. 


90 AMT=(K+T) 
100 FIELD #1,8 AS D$,20 AS NG © 
110 LSET D$= MKS$ ( AMT ) 
120 LSET N$=A$ 34 
130 PUT #1 


See also “CVI, CVS, CVD,” Section 3.9 and “Microsoft | 
BASIC Cartridge File Handling,” in ne Microsoft BASIC 
User's Guide. | 


OCT$(X) 


Returns a string which represents the octal value of the 
decimal argument. X is rounded to an integer before 
OCT$(X) is evaluated. 


PRINT OCT$ (24) 
30 


Ok 


See the HEX$ function, Section 3.14, for details on hexa- 
decimal conversion. | 


3.28 PEEK 
Format 


Remarks 


Example — 


3.29 POS 
Format 


Action 


POS(I) 


PEEK(I) 


Returns the byte from the indicated memory location 
(| ae 


The returned value is an integer in the range 0 to 255. | 
must be in the r 32768 to 65535. (For the interpreta- 
tion of a negative of I, see “VARPTR,” Section 3.43.) 


PEEK is the complementary function of the POKE state- 


ment. | 


A=PEEK (&H5A00) 


| 
| 


Returns the current cursor position. The leftmost position - 
is 1.Xisa dummy argument. 


IF POS(X)>60 THEN PRINT CHR§ (13) 


_ Also see the LPOS function, Section 3.24. 
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3.30 RIGHTS 


Format RIGHTS$(X$,1) 


Action Returns the rightmost | characters of string X$. If lis equal S 
to the number of characters in X$ (LEN(X$)), returns XS. If 
1=0, the null string (length zero) is returned. 


Example 10 A$=''DISK BASIC'' 
20 PRINT RIGHT$(A$,5) 
RUN 
BASIC 
Ok 


Also see the LEFT$ and MID$ functions, Sections 3.20 
and 3.25, respectively. 


3.31 RND 
Format RND[(X)] 7 | oe @ 
Action Returns a random number between 0 and 1. The same 


sequence of random numbers is generated each time the 
program is RUN unless the random number generator is 
reseeded (see “RANDOMIZE,” Section 2.53). However, 
X<0 always restarts the same sequence for any given X. 


X>0 or X omitted generates the next random number in 
the sequence. X=0 repeats the last number generated. 


Example 10 FOR I=1 TO 5 
20 PRINT INT(RND*100) ; 
30 NEXT 
RUN 
24:50 61-51.5 
Ok 


Note The values produced by the RND function may vary with & 
different implementations of Microsoft BASIC. 
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3.32 SGN 
Format 


Action — 


Example 


3.33 SIN 
Format 


Action 


Example | 


SGN(X) 


If X>0, SGN(X) returns 1. 
If X=0, SGN(X) returns 0. 


lf X<0, SGN(X) returns -1. 

ON SGN(X) +2 GOTO 100, 200, 300 

branches to 100 if X is negative, 200 if X is 0, and 300 if Xis 
positive. 


| 


SIN(X) 


_ Returns the sine of X in radians. SIN(X) is calculated in 


single precision. COS(X)=SIN(X+3.14159/2). 


PRINT SIN(1.5)_ 
997495 
Ok 


See also the er nanan Section 3.7. 
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3.34 SPACES 


Format 


Action 


Example 


3.35 SPC 
Format 


Action 


Example 
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SPACE3$(X) 


Returns a string of spaces of length X. The expression X is 
rounded to an integer and must be in the range 0 to 255. 


10 FOR I=1 TO5 
20 X$=SPACE$ (I) 
30 PRINT X$;I 40 NEXT I 
RUN 

1 

Pe 
3 
4 


Ok 


Also see the SPC function, Section 3.35. 


SPC(I) 


Prints | blanks on the terminal. SPC may only be used with 
PRINT and LPRINT statements. | must be in the range 0 to 
255. A‘:‘ is assumed to follow the SPC(I) command. 


PRINT ''OVER'' SPC(15) ‘'THERE'' 
OVER THERE 
Ok 


Also see the SPACE$ function, Section 3.34. 


Format 


3.37 STRS 
Format 


SQR(X) 
Returns the square root of X. X must be >=0. 


10 FOR X=10 TO 25 STEP 5 
20 PRINT X, SQR| x) 


30 NEXT | 
RUN o. 4 

10 3.16228 
15 - 3.87298 
20 4.47214 
25 5 

Ok 

STR$(X) 


_ Returns a string representation of the value of X. 


5 REM ARITHMETIC FOR KIDS 
10 INPUT '' TYPE A NUMBER''-N 


20 ON LEN(STR$(N)) GOSUB 30,100,200,300, 


400,500 


Also see the VAL function, Section 3.42. 
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3.38 STRINGS 


Formats 
Action 


Example 


3.39 TAB 
Format 


Action 


Example 


STRINGS(I,J) 
STRINGS(I,X$) 


Returns a string of length | whose characters all have | a 
ASCII code J or the first character of X$. | 


10 X$=STRING$ (10,45) 


50 PRINT X$ ''MONTHLY REPORT'' X$_ 
RUN | 


TAB(I) 


‘Spaces to position | on the terminal. If the current print 


position is already beyond space |, TAB goes to that posi- | 

tion on the next line. Space 1 is the leftmost position, and © 
the rightmost position is the width minus one. | must be in 

the range 1 to 255. TAB may only be used in PRINT and . 

LPRINT statements. | | 


10 PRINT ''NAME'' TAB(25) ''AMOUNT'' 
PRINT 

20 READ A$,B% 

30 PRINT A$ TAB(25) BS 


40 DATA ''G. T. JONES'', ''$25.00'' 
RUN : | 3 | 

NAME AMOUNT 
G. T. JONES $25 .00 


Ok 


3.40 TAN 
Format 


Action 


Example 


3.41 USR 
Format | 


- Actior 


“USRI<digit>}0X) 


TAN(X) 


Returns the tangent of X in radians. TAN(X) is calculated in 
single precision. If TAN overflows, the “Overflow” error 


‘Message is displayed, machine infinity with the appropri- 


pplied as the result, and execution continues. 


10 Y=Q*TAN(X) /2 


Calls the user's assembly language subroutine with the 
argument X. <digit> is in the range 0 to 9 and corresponds 
to the digit supplied with the DEF USR statement for that 
routine. If <digit> is omitted, USRO is assumed. See “As- 
sembly Language Subroutines,” in the Microsoft BASIC - 
User's Guide. 


40 B=T*SIN(Y) 
50 C=USR(B/2) 
60 D=USR(B/3) 


3.42 VAL 
Format 


Action 


Example 


VAL(X$) 


Returns the numerical value of string X$. The VAL function 


also strips leading blanks, tabs, and linefeeds from the — 


argument string. For example, 


VAL(* -3”) 


— returns -3. 


10 READ NAME$, CITY$, STATES , ZIPS 
20 IF VAL (ZIP$)<90000 OR VAL(ZIP$) >96699 
THEN PRINT NAME$ TAB(25) ''‘OUTOFSTATE'' 
30 IF VAL(ZIP$)>=90801 AND VAL(ZIP$)<= 
90815 THEN PRINT NAMES TERED) ‘1 LONG 
BEACH''! 


See the STR$ function, Section 3.37, for details on 
numeric-to-string conversion. 


3.43 VARPTR | 


Format 1 


Format 2 


Action 


Note 


Example 


VARPTR(<variable name>) 
VARPTR(#<file number>) _ 
Format 1 


Returns the address of the first byte of data identified with 
<variable name>. A value must be assigned to <variable 
name> prior to enn of VARPTR. Otherwise an “Ille- 
gal function call” error results. Any type variable name may 
be used (numeric, string, array). For string variables, the 
address of the first byte of the string descriptor is returned 
(see “BASIC Assembly Language Subroutines,” in the 
Microsoft BASIC User's Guide for discussion of the string 
descriptor). The address returned will be an integer in the 
range 32767 to -32768. If a negative address is returned, 
add it to 65536 to obtain the actual address. 


VARPTR is usually used to obtain the address of a variable 
Or array so it may be passed to an assembly language ~ 


subroutine. A function call of the form VARPTR(A(0)) is 


usually specified when passing an array, so that the lowest- 
addressed element of the array is returned. 


All simple variab 2s should be assigned before calling 
VARPTR for an array, because the addresses of the arrays 
change whenever a new simple variable is assigned. 


| 
| 


Format 2 


For sequential files, returns the starting address of the 
cartridge 1/O buffer assigned to <file number>. For ran- 
dom files, returns the address of the FIELD buffer assigned 
to <file number>. 


100 X=USR(VARPTR(Y) ) 


Appendices 


A Error Codes and Error Messages 
B Mathematical Functions 
C ASCIil Character Codes 
D Microsoft BASIC Reserved Words 
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we _ APPENDIX A 


ror Codes $d E Error Messages. 


NF 1. NEXT without ee | 


Statement does not correspond to 
1, unmatched FOR statement vari- 


A variable inaN 
a: 


‘SN 2 Symtaxenor 


A line is encountered that contains some incorrect se- 
ick age: “quence, of characters (such as unmatched parenthesis, 
ee te fF command or statement, incorrect punctuation, 
etc.). Microsoft E BASIC aeaueny enters edit mode at 
the line that cause 


‘RG 3‘ Return without GOSUB 


n is encountered forwhichthereisno 
GOSUB statement. 


- ~ ARETURN tatem 
previous, unma 


OD 4 Out of data 


os , READ statement i vei@auied when there are no DATA 
statements with a ad data remaining in the program. 


FC 5 Illegal function call : 


oes tree oA parameter that iBlout of range is passed to a math or 
enone ‘onto nSting unction. ~— error may also occur as the result of: 


- A negaive. or unreasonably large subscript 


& ; 2. A negative or zero argument with LOG. 
3. A negative argument to SQR. 


4. A negative mantissa with a noninteger exponent. 
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OV 


OM 


UL 


BS 


DD 
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10 


5. A call to a USR function for which the starting address 
has not yet been given. 7 


6. An improper argument to MID$, LEFTS, RIGHTS, INP, 
OUT, WAIT, PEEK, POKE, TAB, SPC, STRINGS, 
SPACES, INSTR, or ON... GOTO. 

Overflow 

The result of a calculation is too large to be represented in 

Microsoft BASIC number format. If underflow occurs, the 

result is zero and execution continues without an error. 

Out of pee | 

A program is too large, or has too many FOR loops 0 or 

GOSUBs, too many variables, or expressions that are ig 

complicated. a 

Undefined line 


A nonexistent line is seforencea in a GOTO, GOSUB, | 
IF... THEN...ELSE, or DELETE paewen. : 


Subscript out of range 


An array element is referenced either with a Sibecholt that 


_ is outside the dimensions of the array or with the wrong 


number of subscripts. 


Redimensioned array 


- Two DIM statements are given for the same array; or, a 
DIM statement is given for an array after the default dimen- 


sion of 10 has been established for that array. 


™ 


OS 


11 


12 


13 


14 


15 


16 


17 


Division by zero 


A division by zero is encountered | in an expression; or, the 
| results in zero being raised to a 
babes with the sign of the nu- 


machine init is supplied as the result of the involution, 


Illegal direct 


A statement that is ‘Wegal in direct mode is entered as a 
direct mode command. 


Type mismatch 
A string variable name is assigned a numeric value or vice 


versa; a function that expects a numeric argument is given 
a string argument ” vice versa. 


Out of string space 
String variables ha end BASIC to exceed the amount 
of free memory ining. Microsoft BASIC will allocate 


string space lly, until it runs out of memory. 


String too long 


An attempt is made to create a string more than 255 
characters long. 


- String formula too complex 


Astring expression is too long or too complex. The expres- 
sion should be broken into smaller expressions. 


Can't continue 


An attempt is made to continue a program that: 


1. Has halted due to an error. 


UF 
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—18 


19 


20 


21 


22 


23 


26 


29 


2. Has been modified during a break in execution. 
3. Does not exist. 
iadefned user ionction 


AUSR function! is called before the function definition (DEF 
statement) is given. 


No RESUME 


An error handling routine is entered but contains no RE- 
SUME statement. | 


RESUME without error 


A RESUME statement is encountered pele an error 
handling routine is entered. 


Unprintable error 


An error message is not available for the error condition 
which exists. 


Missing operand | 


An expression contains an operator with no operand fol- 
lowing it. 


Line buffer overflow 


An attempt has been made to input a line that has too many 
characters. 


FOR without NEXT 


A FOR statement was encountered without a matching 
NEXT. 


WHILE without WEND 


A WHILE statement does not have a matching WEND. 


31 


84 Bad file mode 


File not found 


WEND without WHILE 


A WEND saul was encountered without a matching 
WHILE. | wee 


Cartridge Errors 


Field overflow 


AF IELD prmenner attempting to allocate more bytes 
than were specified for the record length of a random file. 


Internal error 


An internal malfunction has occurred in Microsoft BASIC. 
Report to Microsoft the conditions under which the mes- 


sage appeared. 
file number 


A statement or and references a file with a file num- 
ber that is not OPEN or is out of the range of file numbers — 
specified at on 


A LOAD, KILL, or OPEN statement references a file that 
does not exist on the current disk. 


An attempt is made to use PUT, GET, or LOF with a 
sequential file, to LOAD a random file, or to execute an 
OPEN statement with a file mode other than |, O, or R. 


File already open 


A sequential output mode OPEN statement is issued for a 
file that is already open; or a KILL statement is given for a 
file that | is open. 
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57 


58 


61 


62 


63° 


64 


66 


67 
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Disk I/O error 

An I/O error occurred on a cartridge |/O operation. It is a 
fatal error; i.e., the operating system cannot recover from 
the error. 

File already exists 


The filename specified in a NAME statement is identical to 


a filename already in use on the catia: 


Disk full 

All cartridge storage space is in use. 

Input past end 

An INPUT statements executed after all the data in the file 
has been INPUT, or for a null (empty) file. To avoid this 
error, use the EOF function to detect the end-of-file. 
Bad record number 

In a PUT or GET statement, the record number is either 
greater than the maximum allowed (32, 167) or equal to 
zero. 

Bad file name | | 

An illegal form is used for the filename with z aLOAD, SAVE, 
KILL, or OPEN statement (e.g., a filename with too many 
characters). 


Direct statement in file 


Adirect statementis encountered while LOADing an ASCII- 


format file. The LOAD is terminated. 
Too many files 


An attempt is made to create a new file (using SAVE or 
OPEN) when all 255 directory entries are full. 


Derived Functions 


Functions that are not intrinsic to Microsoft BASIC may be calculated as 


follows. | 


Function Microsoft BASIC Equivalent 


SECANT 
COSECANT 
COTANGENT 
INVERSE SINE 


INVERSE COSINE 
INVERSE SECANT 
INVERSE COSECANT 
INVERSE COTANGENT 
HYPERBOLIC SINE 
HYPERBOLIC COSINE 
HYPERBOLIC TANGENT | 
HYPERBOLIC SECANT 

_ HYPERBOLIC COSECANT 
HYPERBOLIC COTANGENT 


INVERSE HYPERBOLIC 
SINE 


INVERSE HYPERBOLIC 
COSINE 


INVERSE HYPERBOLIC 
TANGENT 


~ SEC(X)=1/COS(x) 

~ CSC(X)=1/SIN(X) 

~ COT(X)=1/TAN(X) 

~ ARCSIN(X)=ATN(X/SQR(-X*X 


+1)) 


~ ARCCOS(X)=-ATN(X/SQR(-X*X 


+1))+1.5708 


_ ARCSEC(X)=ATN(X/SQR(X*X-1)) 

_ +SGN(SGN(X)-1)*1.5708 | 

_ ARCCSC(X)=ATN(X/SQR(X*X-1)) 

~ +(SGN(X)-1)*1.5708 : 

_ ARCCOT(X)=ATN(X)+ 1.5708 

~ SINH(X)=(EXP(X)-EXP(-X))/2 

~ COSH(X)=(EXP(X)+EXP(-X))/2 

~ TANH(X)=(EXP(X)-EXP(-X))/ 


_ (EXP(X)+EXP(-X)) 


SECH(X)=2/(EXP(X)+EXP(-X)) 
_ CSCH(X)=2/(EXP(X)-EXP(-X)) 
_ COTH(X)=(EXP(X)+EXP(-X))/ 


(EXP(X)-EXP(-X))  . 


_ ARCSINH(X)=LOG(X+SQR(X*X 
$4) a 

~ ARCCOSH(X)=LOG(X+SQR(X*X 
ty) 


ARCTANH(X)=LOG((1+X)/_ 


(1-x))/2 
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INVERSE HYPERBOLIC 


SECANT ARCSECH(X)=LOG((SQR(-X*X 
+1)+1)/X) : 
INVERSE HYPERBOLIC — 4 a 
COSECANT ARCCSCH(X)=LOG((SGN(X) © 
*SQR(X*X+1)+1)/X) 
INVERSE HYPERBOLIC | 
COTANGENT ARCCOTH(X)= ssa alled 
(X-1))/2 


140 


“APPENDIX C 


ASCII Character Codes 


Dec 


Hex 


OZZ-RXC-TOTMMINODFSO~V IA” 


CHR 


ote 


OAONODARWNH—-O~: 


a 
b 
C 
d 
e 
f 
g 
h 
j 
k 
| 
m 
n 
O 
p 
q 
r 
S 
t 
u 
Vv 
w 
x 
y 
z 
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2) 
ale 
me) 


Lo Ne eee 


APPENDIX C 
ASCII Character Codes 


Dec Hex CHR Dec Hex CHR Dec Hex CHR @ 


038 26H & 081 SIH Q 124 7CH || 
039 27H ° 082 S2H 8=6OR 125 7DH } 
040 28H ( 083 SSH oS 126 fd =| oe 
041 29H  ) 084 S4H OT 127 7FH DEL 
042 2AH * 085 SSH =O 


Dec= decimal, Hex=hexadecimal (H), CHR=character, LF=Line Feed, 
FF=Form Feed, CR=Carriage Return, DEL=Rubout | 
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APPENDIX D | 
MICROSOFT BASIC RESERVED WORDS 


The following is a list of reserved words used in Microsoft BASIC. 


ABS ERASE LOF RIGHT$ 
AND ERL LOG RND 
ASC ERR LPOS RSET 
ATN ERROR LPRINT RUN 
AUTO END LSET SAVE 
CALL EXP MERGE SBN 
CDBL FIELD MID$ SIN 
CHAIN FILES $MKD$ SPACE 
CHR$ FIX MkKI$ SPC 
CINT FOR MKS$ SQR 
CLEAR FRE MOD STOP 
CLOSE GET NAME STR$ 
COMMON GOSUB NEW STRING$ 
CONT HEX$ NOT SWAP 
COS ie OCT$ SYSTEM 
CSNG IMP ON TAB 
CVD INP OPENON TAN 
CVI INPUT OPTION THEN 
CVS INKEY$ OR TO 
DATA INPUT# PEEK TROFF 
DEFDBL INPUT$ POKE TRON 
DEFINT INSTR POS 
DEFSNG INT PPRINT USR 
DEFSTR KILL PRINT# USING VAL 
DEF FN LEFTS PUT VARPTR 
DEF USR LEN RANDOMIZE WAIT 
DELETE LET READ WEND 
DIM LINE REM WHILE 
EDIT LIST RENUM WRITE 
ELSE LLIST HESET . WRITE# 
END LOAD _ RESTORE XOR 
EOF LOC _ RESUME 
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